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PART I 


RELEASE SUMMARY 



RTS V2.0 RELEASE SUMMARY 


1 


1.1 PRODUCTS 

Version 2. 0 of the Real-Time SCOPE (RTS) Operating System is accompanied by the following 
product set members. 

3100/3200 ADAPT Version 1.1 
3100/3200/3300 BSIPP Version 2.2 
3100/3200 (BCD) COBOL Version 3.0 
3300 (BDP) COBOL Version 2. 0 
3300 COMPASS Version 2.0 
3100/3200 COSY Version 2. 0 
3200 FORTRAN Version 3.0 

MSOS/RTS Error Recovery Routines Version 1.1 

3100/3200 PERT Cost Version 2.1 

3100/3200 PERT Time Version 2.1 

Report Generator Version 1= 1 

SAINT Version 2.3 

SCOPE UTILITY Version 1.4 

3100/3200/3300 SIPP Version 2.2 

TAPE SORT/MERGE Version 3. 0 

1.2 MATERIALS 

Package A 

Two tapes (COSY tape 1 and COSY tape 2) contain the RTS routines in COSY format. 

Binary release tape for use in installing RTS contains the following files. 

File 1 Interim library PRELIB source 
File 2 Standard PRELIB source 
File 3 Batch PRELIB source 
File 4 BDP COBOL PRELIB source 
File 5 512 initiator binary 

Package B 

One tape for 16K variant of PERT Time. 


o noon aaa A 
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Package C 


One tape for 32K variant of PERT Time. 
Package D 


One tape for PERT Cost. 
Package E 


One tape for 16K variant of ADAPT. 

Package F 

One tape for 32K variant of ADAPT. 

Package G 

Changes for MMTC in the following form: 

COSY changes for CIO 

COSY changes for xCICRECl (x= S or B) 

COSY changes for RDUMP 

COSY changes for PRELOAD 

COSY changes for LOADER 

COSY changes for POST LOAD 

COSY changes for ERROR RECOVERY 

COSY formatted deck of DRIVMMTC 

COSY formatted deck of MMTdNIT 

Binary deck of MMTCINIT 
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FILE STRUCTURE 


Cosy Tape 1 



Utility 

Routines 



Cosy Tape 2 



Binary Release Tape 
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1.3 NEW FEATURES 


1.3.1 RTS 

Standard error recovery improves recovery from I/O errors and types standardized error 
diagnostics on CTO. 

RTS no longer aborts arbitrarily; it passes control to the error recovery routines. 

All system messages are in the standard format established by RTS/MSOS. 

Installations at the required FCO levels can incorporate channel transmission parity error 
recovery. 


Controller t 

FCO Level 

3127 

CA 18730 

322x 

CA 19640 

3245 

CA 18690 

3248 

CA 18691 

3256 

CA 19192 

342x 

CA 17773 

3446 

CA 18927 

3447A 

CA 18731 

3447B 

CA 18926 

362xA 

CA 19639 

362xB 

CA 19525 

3 63 7A 

CA 17759 

3644 

CA 18689 

3649 

CA 18688 

3659 

CA 18945 


A memory allocation map is printed whether loading is successful or unsuccessful. 

A BATCH program may now terminate abnormally without a dump. 

Standard driver for the Modular Magnetic Tape Controller [3518(lx8)/3528(2x8)] and the 657/659 
Tape Transports. 

*The controllers listed are registered equipment of Control Data Corporation. 


1-1-4 


60237000A 



When the program requests release of a nonexistent file, an informative (I) message is typed and 
the job continues rather than aborting, as occurred in previous versions. 

RTS attempts to release a not-ready tape unit. If the unit is not released on the first attempt, 
control passes to the next job in the stack instead of looping in the unit release procedures. 

Installation options include: 

Stacking of clock interrupt requests. 

A basic system accounting routine (requires clock interrupt option). 

Detection of lost interrupts with the timeout routine (requires clock interrupt option). 

A BATCH-only system. 

The CONTROL DATA® 512 Train Printer can be incorporated. Optionally, the programmer or 
operator can load the 512 Train Printer image memory with a specified buffer at inter-job time. If 
this option is selected, the buffers are established according to user trains at the time of 
installation. 


The printer driver contains carriage control character R to 
to suppress auto page eject. 

The identification card for DUMP is changed to RDUMP to maintain system consistency. The 
control card UNIT, 55, DUMP in the PRELIB source tape is changed to UNIT, 55, RDUMP. 


JOB and EOF cards now contain distinctive multiple punches. 





















The user can now define l-37g different hardware types, as compared to 13g in previous releases. 

Priority programs can use the overlay processor; overlay processor (OVPRO) uses only magnetic 
tape. 

The CONTROL DATA® 915 Optical Character Page Reader driver can be incorporated. 

The CONTROL DATA® 3691 Paper Tape Reader Punch can be incorporated. 

RTS recognizes the REPEAT button on the console typewriter for all statements from the 
operator. 

Entry points and external names are blocked 10 to 12 names per line on the output records of 
PRELIB. 

Values for MEMORY and MEMORYE are printed on MAP. 

The operator can release the standard PUNCH so that jobs can be run even if the punch is down. 
The system checks parity on all absolute records on the library tape including BOOT. 

The ENDSCOPE card includes three parameter choices. 

^ENDSCOPE,^ 

N Rewind INP, but not OUT and PUN 

R Rewind INP, OUT, and PUN, but not unload 

(neither) Rewind and unload INP, OUT, and PUN 
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The CTO card includes three parameter choices. 
qCTO.l message 

T Card logged only on CTO 

L Card logged only on standard OUT 

(neither) Card logged on both CTO and standard OUT 

RTS has improved ready message handling and allows the operator to ready the unit through manual 
interrupt. 

At autoload time, the operator can gain typewriter control by typing CFO and pressing FINISH in 
response to the TIME request. 

The system provides improved overhead when generating overlay programs. 


1.3.2 ERROR RECOVERY 

The error recovery routines facilitate hardware recovery from I/O errors. These routines are 
incorporated into variable resident. Their use by the loader, postload, and RDUMP is optional, 
permitting the installation to omit them if saving core is more desirable than the error recovery 
routines. The operator communicates with the error recovery routines through manual interrupt 
procedures. 


1.3.3 COMPASS 

OVERLAYl allows random placement of the following cards without interfering with the processing 
of LIBM and MACRO cards. 

comment cards 

REM 

TITLE 

SPACE 

EJECT 

COMPASS cards use the F parameter to force execution of the load-and-go output regardless of 
assembly errors. The F parameter has the same form as the X parameter and requires RTS 
control cards ^LOAD,56 and ^RUN. 

Standard error recovery improves recovery from I/O errors and types standardized error 
diagnostics on CTO. 
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COMPASS attempts to continue assembly even when irrecoverable I/O errors occur. Execution is 
omitted even if the F parameter is specified. 


1.3.4 FORTRAN 

Standard error recovery improves recovery from I/O errors and types standardized error 
diagnostics on CTO. 

The user can generate Hollerith constant strings in the following manner. 

DATA(MESSAGE=21H THIS IS A BCD STRING) 

The user can incorporate a single branch logical IF statement into the compiler. 

The user can dimension in all TYPE statements except TYPE other. 

A label can be used after a $ on a multistatement card. 

The user can modify UNITSTF to test for EOT. 

The DATA statement allows insertion of specific values into the COMMON/DATA area at compile 
time. This has been expanded to include the program variables area. 

Parameters on the ^FORTRAN card can now be equated to specific logical units (e.g. , 

1 FORTRAN, L=04,I=03, A=05,X=06, P=07). If the equate option is not used, parameter assignment 
y 

1 4 ~ . tlm r ar.-.ja cig ir. uargtcr.C 


7 

The gFORTRAN card can include an M parameter to select a memory map showing the relative 
memory location of each variable and statement within a subprogram. 

In a FORTRAN data statement, a simple floating-point variable previously defined by a dimension 
statement may be preset to 1-8 Hollerith characters. 


1.3.5 BCD AND BDP COBOL 

Standard error recovery improves recovery from I/O errors and types standardized error 
diagnostics on CTO. The compiler attempts to complete compilation even when irrecoverable 
errors occur on output units, as long as an output option exists. The operator can optionally dump 
bad input blocks on a previously equipped unit during object time execution. 

COBOL loading diagnostics are written on both OUT and CTO. 
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1.3.6 COSY 


The D parameter on a COSY card can be used to change the names of COSY decks. 

All COSY output from this version of COSY is in 3300/3500 COSY format. The output cannot be 
used with previously released COSY, but output from previously released COSY can be used with 
the COSY in this release. 

The S parameter on a ^COSY card suppresses the job when a revision card sequence error is 
found. 

Standard error recovery improves recovery from I/O errors and types standardized error 
diagnostics on CTO. 


1.3.7 TAPE SORT 

Standard error recovery improves recovery from hardware errors and types standardized error 
diagnostics on CTO. 

The numeric BCD sign is carried as the upper two bits of the least significant character in the 
field for collating sequence number 5. 

Setting SORTK enables the library and the input unit to share a unit in SORT. This facilitates the 
use of only three tape drives to run a polyphase sort. 


1.3.8 BSIPP 

The block count for a labeled tape is edited into the trailer label. 

The accounting for record input and output is increased from four to eight digits. 

The system now types two messages. The first determines the maximum number of operations 
possible with the core storage available. 

NO. OF OPS POSSIBLE - xx 

The second determines the maximum number of operations allowed with the equipment available. 

NO. OF OPS ALLOWED = xx 


1.3.9 SIPP 

The block count for a labeled tape is edited into the trailer label. 
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The accounting for record input and output is increased from four to eight digits. 

The system now types two messages. The first determines the maximum number of operations 
possible with the core storage available. 

NO. OF OPS POSSIBLE = xx 

The second determines the maximum number of operations allowed with the equipment available. 

NO. OF OPS ALLOWED = xx 


1.4 MODIFICATIONS AND CORRECTIONS 

1.4.1 RTS V2.0 OPERATING SYSTEM 

PSR's incorporated: 


509 

1315 

566 

1324 

570 

1326 

572, 857 

1393 

577, 1096 

1415 

606 

1462 

615, 1118 

1485 

645 

1539 

704 

1540 

743 

1573 

744 

1604 

747 

1614 

766 

1658 

831 

1710 

832 

1748 

835 

1780 

847 

1841 

1053 

1854 

1054 

1856 

1086 

1881 

1136 

1988 

1189 

2253 

1244 

2283 


2348 


1 - 1-10 


60237000 



1.4.2 FORTRAN 


PSR's incorporated: 


599 

1580 

2092 

605 

1600 

2115 

608 

1607 

2141 

659 

1608 

2164 

813 

1626 

2170 

817 

1646 

2186 

821 

1685 

2189 

928 

1686 

2190 

962 

1692 

2191 

1024 

1693 

2203 

1069 

1716 

2209 

1070 

1728 

2245 

1169 

1768 

2264 

1234 

1773 

2289 

1248 

1774 

2290 

1 OKQ 

1^00 

1785 


1321 

1788 


1352 

1817 


1360 

1830 


1433 

1842 


1503 

1858 


1530 

1874 


1567 

1887 


1578 

1997 



2030 



2034 
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1.4.3 COMPASS 


PSR's incorporated: 


597, 1818 (both superseded by PSR 2255) 
703 
753 
932 
948 
1355 
1537 
1812 
1813 
1893 
2049 
2068 
2136 
2196 
2243 
2252 
2255 

2287 

2288 
2295 
2491 
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1.4.4 COSY 


PSR's incorporated: 

662 

830 

1356 

1467 

1504 

1575 

1576 
1599 
1623 
1727 
1787 
1851 
1940 
1972 
1985 
2008 
2037 
2091 
2254 
2349 
2410 
2422 
2465 


1.4.5 SAINT 


PSR's incorporated: 

2032 

2033 


oAoo^Ann 
UU6UIuvv 



1.4.6 COBOL-33 V2.0 (BDP) 


PSR's incorporated: 


208 

725 

209 

729 

212 

814 

216 

848 

476 

849 

485 

854 

541 

1057 

575 

1075 

612 

1080 

626 

1122 

643 

1162 

644 

1294 

673 

1323 

674 

1482 

675 

1484 

699 

1602 

707 

1660 

708 

1746 


1690 


2262 


2299 


2285 


2273 
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1.4.7 COBOL V3.0 (BCD) 
PSR's incorporated: 


184 

725 

185 

825 

190 

848 

191 

849 

208 

1057 

209 

1075 

212 

1078 

216 

1079 

414 

1159 

476 

1162 

485 

1294 

541 

1323 

545 

1482 

575 

1484 

612 

1602 

/?nn 

1660 

644 

1690 

675 

1746 

699 

2262 

707 

2299 

708 

2285 


2273 


1.4.8 TAPE SORT V3.0 
PSR's incorporated: 


53 

868 

1359 

1543 

56 

950 

1422 

1544 

63 

954 

1449 

1554 

469 

1093 

1488 

1590 

470 

1114 

1525 

1595 

473 

1121 

1526 

1606 

474 

1148 

1533 

1624 

748 

1243 

1534 

1625 

793 

1270 

1540 

1631 

808 

1272 

1541 

1634 


1635 

1799 

1861 

1946 

1637 

1800 

1862 

1965 

1638 

1801 

1863 

1969 

1661 

1802 

1873 

2005 

1662 

1807 

1890 

2013 

1670 

1822 

1891 

2026 

1749 

1832 

1898 

2042 

1796 

1853 

1932 

2105 

1797 

1859 

1941 


1798 

1860 

1952 
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1.4.9 BSIPPV2.2 


PSR's incorporated: 


1308 (1317) 

1374 

1375 
1377 
2743 


1.4.10 SIPPV2.2 


PSR's incorporated: 


1019 (1341) 

1048 (1154) 

1049 
2743 
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1.5 DEFICIENCIES 


The following describes the deficiencies and limitations in the system and products of this release 
and, when possible, the corrective code or the corrective action to employ when the difficulties 
occur. 


1.5.1 RTS TAPE SORT 

Two searches of the library are required to load the internal Sort phase of Tape Sort. 


1.5.2 FORTRAN 

A label after $ on a multi-statement card causes a diagnostic: 

D FTNC 0514 DETECTED AT STATEMENT NO. n CANNOT IDENTIFY STATEMENT TYPE. 
STATEMENT NAME MISSPELLED OR MISUSED OR AN EQUAL SIGN IS MISPLACED. 


1.5.3 REPORT GENERATOR 

Report generator does not run under BDP COBOL because the design of report generator assumes 
BCD hardware or simulation. 


1.5.4 BCD AND BDP COBOL ' 

Omitting the END PROGRAM and FINIS cards in a COBOL source deck or placing a binary card 
between the COBOL control card and the end of the source deck causes the compiler to loop. 

Extraneous diagnostics may result when several errors are diagnosed in compiling a source 
statement. If non-numeric literals are involved, extraneous characters may be generated and 
later diagnosed as invalid. 

The object time package GPIO does not call error recovery for the display routine. A program 
using display will loop if the unit is not ready. 


1.5.5 ADAPT VERSION 1.1 

Detection of errors in the creation of the overlay tape may result in bypassing CLTAPE printout 
for the 16K variant. 
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1.6 LIMITATIONS 


1. 6.1 RTS VERSION 2. 0 OPERATING SYSTEM 

It is no longer possible to define several different origins within a record to be absolutized for 
PRELIB; a record card must be followed by only one origin card. 

RTS does not recover from channel parity errors on the 3256/3659 printer controllers. This is 
because no external equipment reply is generated by either controller when a channel parity error 
occurs. 

If a card reader feed-fail occurs with the 3248 controller, recovery is successful if CIO uses the 
TIMEOUT feature. The 3248 generates an external interrupt if feed-fail occurs; however, it 
does not physically interrupt the CPU. In this case, TIMEOUT provides the external interrupt 
which forces a check of tiie card reader and then forces the card reader to clear. The user that 
doesn't use TIMEOUT cannot recover because no external stimulus is provided. 

When logical units 55 and 56 are being equipped, RTS does not check for the presence of a write 
ring. 

The length of POSTLOAD can never be greater than the length of the loader; therefore, if 
POSTLOAD has error recovery, both the loader and OVPRO must have error recovery. 

Character I/O will not be allowed on 659 Tape Transports. The following MMTC status bits will 
be edited to the existing parity bit in the UST type status; 

parity errors 
phase encoded errors 
cyclic redundancy errors 
memory flag bit errors 

The standard driver for the MMTC must be installed as an add-on in card form as the current 
and interim systems do not have the ability to handle MMTC/65x. 


1.6.2 COMPASS VERSION 2.0 

COMPASS does not allow loac^-and-go execution if irrecoverable I/O errors occur, even if the F 

parameter is selected on the COMPASS card. 

9 

1.6.3 REPORT GENERATOR 

The report generator package does not execute on a 3300 or 3500 Computer System equipped with 
BDP hardware. 
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1.6.4 TAPE SORT 


The density of the shared tape drive must be manually set when using SORTK. 

When an error occurs, the error recovery routines have control until recovery is effected or the 
operator replies either A or D. If the operator types in an A response, control returns to SORT 
and the option selected on the control card is executed. 


1.6.5 SIPP 

SIPP functions which use tape parity (even or odd) to determine the mode in which data is recorded 
(BCD or Binary) will not perform correctly with nine track tape transports (MMTC/659). 


1.6.6 BSIPP 

BSIPP functions which use tape parity (even or odd) to determine the mode in which data is recorded 
(BCD or binary) will not perform correctly with nine track tape transports (MMTC/659). 


1.6. 7 SCOPE UTILITY 

SCOPE Utility functions which use tape parity (even or odd) to determine the mode in which data 
is recorded (BCD or binary) will not perform correctly with nine track tape transports (MMTC/659). 


1.7 PUBLICATIONS 

The following publications are relevant to the use of RTS product set. 

Control Data Publications 
3100/3200/3300/3500 RTS Reference Manual 
3100/3200/3300/3500 RTS Operator's Guide 
3100/3200/3300/3500 COMPASS Reference Manual 
3100/3200/3300/3500 FORTRAN Reference Manual 
3100/3200/3300/3500 COSY Reference Manual 
3100/3200/3300 SIPP Background Operator Reference Manual 
3100/3200 SIPP Reference Manual 
3100/3200/3300 COBOL Reference Manual 


Pub. No. 
60172500A 
60170200 
60236800 
60057600C 
60207300A 
60190200 
60130400A 
60132000 
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3100/3200/3300 COBOL V2.0 Extension and Revisions ADB 
3100/3200/3300 SCOPE UTILITY Reference Manual 
3100/3200/3300/3500 ADAPT Reference Manual 
3100/3200/3300 PERT/TIME Reference Manual 
3100/3200/3300 PERT/COST Reference Manual 
3100/3200/3300/3500 SAINT Reference Manual 
3100/3200/3300/3500 Tape SORT/MERGE/MSOS Reference Manual 
3100/3200/3300/3500 RTS/MSOS Diagnostic Handbook 


60130200 

60173400 

60131100 

60132500A 

60213700 

60059700A 

60236700 
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PART II 


INSTALLATION PROCEDURES 



INSTALLATION OVERVIEW 


1 


Capsulized installation procedures summarize the steps necessary to prepare the RTS interim and 
final libraries. Before attempting installation, it is essential that the user be completely familiar 
with the detailed installation procedures. 


1.1 CAPSULIZED INSTALLATION PROCEDURES 

The PRELIB deck obtained from file 1 of the binary release tape may be used as standard INP or it 
may be punched on an RTS or Tape SCOPE library. Execute this deck using the existing RTS or 
Tape SCOPE as the input library to obtain a new library containing the special PRELIB. The new 
library is written on logical unit 1 and contains the operating library for final library preparation. 
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DETAILED INSTALLATION PROCEDURES 


2 


The installation procedures for RTS and its product set are organized into four sections. Through¬ 
out these procedures certain parameters are site dependent and must be supplied by the user. 
Therefore, the user must read the procedures completely and prepare all materials before attempt¬ 
ing installation. 

Division of installation procedures: 

Hardware Initialization 
Deck Preparation 
Final Library Generation 
Post Generation Information 


2.1 HARDWARE INITIALIZATION 

2.1.1 AUTOLOAD ROUTINE 

An autoload routine in the autoload region of core must be manually established for each installation. 
This routine is a basic, permanent machine entry used to initiate tape operations (part III, 
section 1). 


2.1.2 512 INITIALIZATION 

The image memory of the 512/3555 must be loaded before print operations can be executed. When 
loading the 512/3555 image memory, use the following instructions: 

1. The one card loader 

Punch the one card loader (section 4.5) and define the appropriate channel and equip¬ 
ment of the card reader. 


c 

EQU 

n 


n 

Channel (0-7) of the card reader 

EUUU 

EQU 

mmmm 


mmmm 

12-bit connect code for the card reader 


For example: Assume a card reader configuration of channel 0, equipment 2, unit 0. 
C, EUUU would be as follows: 

C EQU 0 

EUUU EQU 2000 g 
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2. The image initiator program contains the individual train images and several sub¬ 
routines that extract the configuration of the 512 and write the memory image. 

Place the one card loader in the card reader, followed by the library deck of the image 
initiator. Autoload from the card reader. The following is typed: 

512 IMAGE INITIATOR 
T(l) = 595-1 (501 COMPATIBLE) or 
T(2) = 595-2 (AN COMPATIBLE) or 
T(3) = 595-3 (HN COMPATIBLE) 

512 =« CcEeUuu 

Type the appropriate channel, equipment, and unit of the 512. Upon completion, the 
user must define the train in response to the following typeout: 

TRAIN = T( 

Answer by typing digit 1, 2, or 3 as defined above. 

Upon completion of initialization the following message is received, and the 512 is ready 
for use. 


IMAGE INITIATED 

2.2 PREUB DECK MODIFICATION 

The PRELIB source, whether punched or supplied, requires modification before the final RTS 
library generation can proceed. The modification procedures are divided into five subsections. 

System installation-dependent routines 
Error recovery assembly options 
Product set assembly and options 
Replacement card 
Unit card 

BCD, BDP, and FDP options 
Driver selection 
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2.2.1 INSTA LLATION-DE PENDENT ROUTINES 


The following routines must be modified according to each particular hardware configuration. 
Several procedures apply to all systems; others apply only to standard (STD) or BATCH RTS. 


STD 

BATCH 

CIO 

BCIO 

SCICREC1 

BCICREC1 

RDUMP 

RDUMP 

PRELOAD 

PRELOAD 

LOADER 

LOADER 

OVPRO 

OVPRO 

POSTLOAD 

POSTLOAD 


CIO MODIFICATIONS (STD) 


If the lost interrupt timeout feature is desired, select the following option: 

DELETE/ 3 

TIMEOUT EQU 1 

The current value of TIMEOUT is 0. If the timeout option is selected, the clock option (SCICREC1) 
must also be selected. 

CIO DECK/ p 1 ,p 2 ,... 

BCIO MODIFICATIONS (BATCH) 

If the lost interrupt timeout feature is desired, select the following option: 

DELETE/ 3 

TIMEOUT EQU 1 

The current value of TIMEOUT is 0. If the timeout option is selected, the clock option (BCICREC1) 
must also be selected. 

BCIO DECK/ p 1 ,p 2 ,... 
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SCICREC1 (STD) 


SCICREC1 is a resident program containing tables and various resident subroutines (manual 
interrupt processor, central interrupt control, etc.) for a standard RTS library. SCICREC1 
contains the description of the hardware environment and must be updated to reflect the particular 
hardware configuration (part III, section 2). All options in this release are set to 0 unless other¬ 
wise specified. 

Accounting Option : If the basic job accounting feature is desired, select the following option: 

DELETE/ 4 
ACCT EQU 1 

The current value of ACCT is 0. 

If the accounting option is selected, the clock interrupt processor option must also be selected. 

BDP Option: (3300 users with a CONTROL DATA® 3312 Business Data Processing Module) 

If a library with the capability of handling BDP instructions is desired in an installation, make the 
following modification: 

DELETE/ 5 

BDP EQU 1 (If BDP hardware is present) 

This change must be made if the BDP hardware option is included in the PRELIB source deck. 

The current value of BDP is 0. 

Clock Interrupt Processor Option : If it is desirable to have the clock interrupt processor 
available for programmer use in an installation, make the following modification: 

DELETE/ 6 

CLOCK EQU 1 

The release value of CLOCK is 0. 

If the timeout feature has been selected (CIO), the clock option must also be selected. 

CST and EST Modifications : The CST and EST are established by control parameters. 

DELETE/ 7 

NCHANS EQU n 
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In all cases, n depends on available channels indicated in the following table. The current value of 
n is 6. 


Highest Available 
Channel Number 

Value of 

n 

1 

2 

2 or 3 

4 

4 or 5 

6 

6 or 7 

8 


Memory Limits: The machine capacity must be properly recorded within SCICREC1. These 
memory limits are used by the system loader when loading a program for execution. 

On the released COSY tape, the cells are set for 32K CONTROL DATA® 3200/3300 Computer 
Systems. They must be changed for the CONTROL DATA® 3100 Computer System. The COSY 
correction is: 


DELETE/ 8 

MAXCORE EQU value 

The symbol value is: 


Machine Type 

16K Value 

32K Value 

3100/3150 

37637 8 

77637 8 

3200/3300 

37737g 

77737 8 


The current setting of value is 77737g 

AET Entries : At installation time, the AET must be defined to describe the equipment available to 
the system. This section describes only the changes to be made in standard RTS. A general 
description of AET is in part in, section 2. 

DELETE/ 2033,2061 

THE AET DESCRIPTION 
FOLLOWS 

RHT Modification : The RHT defines the equipment used during a batch run and equipment assigned 
as system units (PUN,INP,OUT,etc.). The complete description is in part III, section 3.1. The 
following entry must be made for modifications. 

DELETE/ 2126,2132 

RHT modifications 
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BRHT Modification : The BRHT (Priority Running Hardware Table) is similar to the RHT but has 
only logical units 1-49, 58, and 59 available for reference by a priority program. A complete 
description is in part III, section 3.2. The following entry must be made for modifications. 

DELETE/ 2140,2143 
BRHT modifications 

CIT Modification : The CIT must be modified in order to establish the appropriate channels available 
to the input/output system. 


DELETE/ 

00 

2210,2217 

X 

ch 

00 

X 

ch 

00 

X 

ch 

00 

X 

ch 

00 

X 

ch 

00 

X 

ch 

00 

X 

ch 

00 

X 

ch 


x IOIP, if channel is available as system channel defined in AET. 
ABINRT, if channel is not available. 


System Interrupt Mask: A mask contained in SCICREC1 reflects the channels available for system 
use. The COSY correction for file mask is: 

DELETE/ 2253 

SYST.IOM OCT h 

Proper channel description for the system interrupt mask is represented by h; the current value of 
h is 17g. 

The general format of the mask word is: 


23 


07 06 05 04 03 02 01 00 


c 7 

c 6 

C 5 

c 4 

=3 

| c 2 

2 1 

c C 


Ci Bit corresponding to channel i. 

If the channel is available to the system, its corresponding bit is set to 1. If the channel is not 
available, it is set to 0. The dedicated channels or the channels reserved for special applications 
are not represented. They are set to 0. 
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The deck card for these changes is: 

SCICREC1 DECK/ Pi,p 2 ... 


BCICREC1 (BATCH) 

BCICREC1 is a resident program containing tables and various resident subroutines (manual inter¬ 
rupt processor, central interrupt control, etc.) for a BATCH RTS library. BCICREC1 contains the 
description of the hardware environment and must be updated to reflect the particular hardware 
configuration. All options in this release are set to 0, unless otherwise specified. 

Accounting Option: If the basic job accounting feature is desired, select the following option: 

DELETE/ 4 
ACCT EQU 1 

The current value of ACCT is 0. 

If the accounting option is selected, the clock interrupt processor (CIP) option must also be 
selected. 

BDP Option: (3300 users with a CONTROL DATA® 3312 Business Data Processing Module) 

If a library with the capability of handling BDP instructions is desired in an installation, make the 
following modification: 

DELETE/ 5 

BDP EQU 1 (If BDP hardware is present) 

This change must be made if the BDP hardware option is included in the PRELIB source deck. The 
current value of BDP is 0. 

- Clock Interrupt Processor (CIP) Option: If it is desirable to have the clock interrupt processor 
available for programmer use in an installation, make the following modification. 

DELETE/ 6 

CLOCK EQU 1 

The release value of CLOCK is 0. 

If the timeout feature has been selected (BCIO), the clock option must also be selected. 
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CST and EST Modifications: The CST and EST are established by control parameters. 


DELETE/ 7 
NCHANS EQU n 

In all cases, n is dependent on available channels indicated in the following table. The current 
value of n is 4. 


Highest Available 
Channel Number 

Value of 

n 

1 

2 

2 or 3 

4 

4 or 5 

6 

6 or 7 

8 


Memory Limits: The machine capacity must be properly recorded within BCICREC1. These 
memory limits are used by the system loader when loading a program for execution. 

On the released COSY tape, the cells are set for 32K 3200/3300 Computer Systems. They must be 
changed for all 16K and 3100 Computer Systems. The COSY correction is: 

DELETE/ 8 

MAXCORE EQU value 

The symbol value is: 


Machine Type 

16K Value 

32K Value 

3100/3150 

37637g 

77637q 

3200/3300 

37737 g 

77737g 


The current setting of value is 77737g. 

IOT Modification : The IOT (I/O Table) must be modified to establish the appropriate channels 
available to the input/output subsystem. 
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IOT 


DELETE/ 

00 

703,710 

X 

ch 0 

00 

X 

ch 1 

00 

X 

ch 2 

00 

X 

ch 3 

00 

X 

ch 4 

00 

X 

ch 5 

00 

X 

ch 6 

00 

X 

ch 7 


x IOIP, if channel is available as a system channel defined in the AET. 

ABINRT, if channel is not available. 

AET Entries: At installation time, the AET must be defined to describe the equipment available to 
the system. This section describes only the change made in BATCH RTS. A general description of 
AET is in part III, section 2. 

DELETE/ 1306,1326 

THE AET DESCRIPTION 
FOLLOWS 

RHT Modification: The RHT defines the equipment used during a batch run and equipment assigned 
as system units (PUN,INP,OUT,etc.). The complete description is in part III, section 3.1. The 
following entry must be made for modification. 

DELETE/ 1391,1397 

RHT modification 

System Interrupt Mask: A mask contained in BCICREC1 reflects the channels available for system 
use. The COSY correction for the mask is: 

DELETE/ 1438 

SYST. IOM OCT h 

Proper channel description for the system interrupt mask is represented by h; the current value 
of his 178. 
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The general format of the mask word is: 


23 


07 06 05 04 03 02 01 00 


■S 

c 6 

c 5 

c 4 

c 3 

c 2 

C 1 

c 0 


cj Bit corresponding to channel i. 

If the channel is available to the system, its corresponding bit is set to 1. If the channel is not 
available, the corresponding bit is set to 0. 

The deck card for these changes is: 

BCICREC1 DECK/ Pl,P2»--- 

RDUMP (STD/BATCH) 

Standard Error Recovery : If use of the standard error recovery on the RDUMP input/output 
functions is desired, select the following option: 

DELETE/ 21 

SER. OPT EQU 1 

The release value of SER. OPT is 0. The RDUMP deck on the PRELIB sources has SER. OPT set 
to 0. If SER.OPT is set to 1, the error recovery equates TAPE, CARDRDR, CARDPNCH, 
PRINTER, ATTMPT1, ATTMPT2, BKSPLIM2, NOATMPTS, MAXERASE, and CKSMCNST are 
valid (section 2.2.2). 

The deck card for these changes is: 

RDUMP DECK/ p^Pg,... 

PRELOAD (STD/BATCH) 

BATCH Only Option : If the BATCH only variant is desired, select the following option: 

DELETE/ 8 

BF EQU 1 

The current value of BF is 0. The PRELOAD deck on the BATCH PRELIB source has BF set to 1. 
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512 Train Option : If the configuration contains a 512 Train Printer and the user desires the ability 
to change the trains, select the following option: 

DELETE/ 130 

TRAIN EQU 1 

The current value of TRAIN is 0. 

Users with a 595-1 63 character 501 compatible train must set the following: 

DELETE/ 181 

TRN5951 EQU 1 

Users without a 595-1 should leave TRN5951 set to 0. Users with a 595-2 48 character AN train 
must set the following: 

DELETE/ 182 

TRN5952 EQU 1 

Users without a 595-2 should leave TRN5952 set to 0. 

Users with a 595-3 48 character HN train must set the following: 

DELETE/ 183 

TRN5953 EQU 1 

Users without a 595-3 should leave TRN5953 set to 0. Users with additional trains (up to 9), must 
add the following: 


Example (Adds 2 special trains): 



INSERT/ 

634 


ENA 

BUF 595x 


ENA 

BUF 595y 

BUF 595x 

OCT 

144 word buffer 

BUF 595y- 

OCT 

144 word buffer 


DELETE/ 

2822 


ASG 

n (n = Train number + 1) 

Current value is 4. 
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Accounting Option: If the basic job accounting feature is desired, select the following option: 


DELETE/ 131 

ACCT EQU 1 

The current value of ACCT is 0. The value of ACCT must match value of ACCT in xCICRECl. 

The deck card for these changes is: 

PRELOAD DECK/ »P2 > • • • 

LOADER (STD/BATCH) 

Error Recovery Option : If the standard error recovery package on the loader input/output 
functions is desired, select the following option: 

DELETE/ 10 

LERP EQU 1 

The current value of LERP is 0. The loader deck on the PRELIB sources has LERP set to 0. 
For valid error recovery equates, see section 2. 2.2. 

The deck card is: 

LOADER DECK/ pj_,p 2 ,... 

OVPRO (STD/BATCH) 


Error Recovery Option: If the standard error recovery package on the OVPRO input/output 
functions is desired, select the following option: 

DELETE/ 12 

LERP EQU 1 

The current value of LERP is 0. The OVPRO deck on the PRELIB sources has LERP set to 0. The 

LERP option in OVPRO must be set to the same value in LOADER. 

The deck card is: 

OVPRO DECK/ Pi,p 2 ,... 
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POSTLOAD (STD/BATCH) 


Error Recovery Option : If the standard error recovery package on postload input/output functions 
is desired, select the following option: 

DELETE/ 23 

LERP EQU 1 

The current value of LERP is 0. The postload deck on the PRELIB sources has LERP set to 0. 
For valid error recovery equates, see section 2.2. 2. 

The deck card is: 

POSTLOAD DECK/ P x , P 2 ,... 

TAPE SORT 


Installations with Tape SORT may desire the optimum move assembly option to allow optimum 
efficiency on moves, dependent upon the library and the available hardware. The most rapid 
move is the BDP move; the slowest is a hardware move. 

DELETE/ 9 

BDP EQU 0 

BDP EQU 1 

The release value of BDP is 0. 

The deck card is: 

SORT DECK/ Pl»P2>*** 

The BDP PRELIB replaces the hardware move with the BDP move. 


BDP hardware absent 
BDP hardware present 


2.2.2 ERROR RECOVERY ASSEMBLY OPTIONS 

The modularity of error recovery routines permits easy modification to reflect hardware changes 
and customer needs and to implement efficient recovery from detected errors. The routines are 
assembled into PRELOAD and can optionally be assembled into POSTLOAD, LOADER, and 
RDUMP. If assembled into LOADER, error recovery must be assembled into POSTLOAD and 
RDUMP. Any changes made to the error recovery routines should also be made in PRELOAD 
and in POSTLOAD, LOADER, and RDUMP when applicable. 

The library contains two groups of error recovery routines - one in the relocatable file (file 2) 
and the second in the absolute file (file 1). The two sets of routines are identical except that 
file 1 contains two additional routines. In file 1, FTNO precedes the error recovery routines 
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and PROGNAME follows error recovery. FTNO and PROGNAME establish linkage between the 
error recovery routines and the FORTRAN compiler and COMPASS assembler, respectively. 

When the length of any error recovery routine is changed from the released value, the changed 
length must be assembled into the FORTRAN compiler and the COMPASS assembler (section 2.2.3). 
FORTRAN and COMPASS both contain BSS blocks representing the length of each error recovery 
routine. These lengths must correspond to the actual length of the routine in file 1. FORTRAN 
and COMPASS must be reassembled if error recovery is modified from the released version. 

The recommended order of the error recovery routines on the library is: 

RAAR 

SCAR 

MTWPR 

MTRPR 

MTLDACPR 

MTDER 

PRC PR 

CRDER 

CPDER 

MTWPRR 

MTRPRR 

MTLDCPRR 

CMNRTNS 

WHATISIT 

NRD 

NRC 

NWR 

T.NOTRDY 

TYPEOUT. 

WHATKIND 
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ERROR RECOVERY ASSEMBLY OPTIONS 


ROUTINE 


ASSEMBLY OPTION 


CARDRDR 

CARDPNCH 

PRINTER 

NOATMPTS 

MAXERASE 

CKSMCNST 

ATTMPT1 

ATTMPT2 

BKSPLIM2 

t&Mm 

RAAR 

X 











SCAR 

X 

X 

X 

X 








WHATISIT 

X 











NRC 

X 











MTLDCPRR 





X 







MTWPRR 






X 

X 





MTRPRR 








X 

X 

X 


NRD 






_ 





X 


SCAR Modifications 


CARDRDR : This assembly option controls references to card reader recovery within SCAR 
routine. If CARDRDR is equated to zero, all calls to card reader recovery are eliminated and 
CRDER is not called. If CARDRDR is equated to nonzero, card reader recovery is present. 
CARDRDR is nonzero in this release. 

DELETE/ 90 

CARDRDR EQU 7 

CARDPNCH : In the SCAR routine, CARDPNCH controls references to card punch recovery. If 
CARDPNCH is equated to zero, all calls to CPDER routine are eliminated. If CARDPNCH is 
equated to nonzero, card punch recovery is present. CARDPNCH is equated to nonzero in this 
release. 


DELETE/ 91 

CARDPNCH EQU 7 

PRINTER: In the SCAR routine, PRINTER controls references to printer recovery. If PRINTER 
is equated to zero, all calls to PRCPR are eliminated. If equated to nonzero, PRINTER recovery is 
present. PRINTER is equated to nonzero in this release. 

DELETE/ 92 

PRINTER EQU 7 

The deck card is: 

SCAR DECK/ Pl> P2> • • • 
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MTLDCPRR Modification: 


NOATMPTS : In MTLDCPRR routine, NOATMPTS determines attempts at recovery before asking 
for an operator decision. It is currently set at 4. 

DELETE/ 42 

NOATMPTS EQU 4 

The deck card is: 

MTLDCPRR DECK/ Pl,P2,... 

MTWPRR Modifications : 

MAXERASE: In MTWPRR routine, MAXERASE determines the maximum number of erasures 
executed before asking for an operator decision. It is currently set at 11 (which is 10 erasures). 

DELETE/ 58 

MAXERASE EQU 11 

CKSMCNST : In MTWPRR routine, CKSMCNST determines the number of backspaces executed to 
find correct position when checksum repositioning is valid. It is currently set at 4. 

DELETE/ 59 

CKSMCNST EQU 4 

The deck card is: 

MTWPRR DECK/ Pi,p 2> ... 


MTRPRR Modifications : 

ATTMPT1: In MTRPRR routine, ATTMPT1 determines the number of tries using one backspace 
in a read parity recovery. It is currently set at 4. 

DELETE/ 49 

ATTMPT1 EQU 4 

ATTMPT2 : In MTRPRR routine, ATTMPT2 determines the total number of attempts at read parity 
recovery before asking for an operator decision. It is currently set at 8. 

DELETE/ 50 

ATTMPT2 EQU 8 
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BKSPLIM2 : In MTRPRR routine, BKSPLIM2 determines the total number of backspaces for retry 
attempts when retry is recommended by the operator. It is currently set at 3. 

DELETE/ 51 

BKSPLIM2 EQU 3 

The deck card is: 

MTRPRR DECK/ pi,p 2 ,... 

NRD Modification : 

RE APB: In NRD routine, this option, if equated to zero, eliminates READB checks for noise 
records. It is currently set to nonzero. 



DELETE/ 

44 

READB 

EQU 

778 

The deck card is: 



NRD 

DECK/ 

Pl>P2> 


TAPES Modification : 

TAPES : This assembly option controls references to magnetic tapes and is located in SCAR, 

RAAR, WHATISIT, and NRC routines. If TAPES is equated to 0 in SCAR routine, all references to 
magnetic tape routines are eliminated, including calls to MTDER, MTLDCPRR, MTWPRR, 
MTRPRR, and WHATISIT. 

If TAPES is equated to nonzero, the value must reflect the maximum number of tapes used in any 
program for the SCAR and WHATISIT routines. TAPES is equated to 8 in this release. 



DELETE/ 

82 

TAPES 

EQU 

7 

RAAR 

DECK/ 

Pl» P2 >••• 


DELETE/ 

89 

TAPES 

EQU 

8 

SCAR 

DECK/ 

Pi’?2 >• • • 
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DELETE/ 

16 

TAPES 

EQU 

8 

WHATISIT 

DECK/ 

Pl>P2>••• 


DELETE/ 

71 

TAPES 

EQU 

7 

NRC 

DECK/ 

PI»P2»••• 


ROUTINE Macros 

Local macros are provided in the RAAR and SCAR routines to facilitate generation of specially 
assembled decks callable by the use of EXS cards. These macros rename the routines but cannot 
change the necessary equates. 

SCAR Routine Assemble Macro : The SCAR assemble macro provides optional variability with 
SCAR subroutines. 

Name: ASSEMBLE (n) 

(n) 0 Assemble routine with entry points for SCAR, SCARNM, SCARUST1. 
The EDENT card must be changed to SCAR. 

1 Assemble routine with entry points for SCARSP, SCARNMSP, 
SPSCUST1. The EDENT card must be changed to SCARSP. 

2 Assemble routine with entry points for SCARMT, SCARNMMT, 
MTSCUST1. The IDENT card must be changed to SCARMT. 

The IDENT card must be changed to reflect a new name. 

DELETE/ 1 

IDENT name 

DELETE/ 94 

ASSEMBLE (n) 

SCAR DECK/ Pl*P2,... 

RAAR Routine Assemble Macro : The RAAR assemble macro provides optional variability with 
RAAR subroutines. 

ASSEMBLE (n) 

(n) 0 Subroutine RAAR assembled with recovery for magnetic tape and all 

visual equipment; must be equated to nonzero. 

1 Subroutine RAAR assembled with no magnetic tape recovery; TAPES 
must be equated to 0. 
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RAAR 


2 Subroutine RAARSP assembled with no magnetic tape recovery for job 
modularity using EXS card; TAPES must be equated to 0; the ID ENT 
card must be changed to RAARSP. 

3 Subroutine RAARMT assembled, using EXS card, with no visual 
equipment recovery for job modularity; subroutine NRC must be 
reassembled for this option; TAPES must be equated to nonzero; the 
ID ENT card must be changed to RAARMT. The label NRC must be 
equated to NRC.MT, and ASSEMBLE (n) =3 must be followed by: 




INSERT/ 

116 


NRC 

EQU 

NRC.MT 

DELETE/ 

1 



IDENT 

name 



DELETE/ 

81 



ASSEMBLE 

(n) 



DECK/ 

Pi,p 9 ,... 




NRC Routine Assembly Macro: The NRC assemble macro provides optional variability with NRC 
subroutines. 


ASSEMBLE (n) 

(n) 0 Subroutine NRC assembled with recovery for magnetic tape and for 
all visual equipment; TAPES must be equated to nonzero. 

1 Subroutine NRC assembled with recovery for magnetic tape only. 

2 Subroutine NRCMT assembled with recovery for magnetic tape only; 
the IDENT card must be changed to NRC. MT; TAPES must be 
equated to 0. 


NRC 


DELETE/ 1 

IDENT name 

DELETE/ 70 

ASSEMBLE (n) 

DECK/ Pi,P 2> ... 


Error Recovery Equates 

Error recovery equates vary for the variable resident routines and can be tailored to each 
installation. 
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PRELOAD : Error recovery is always present for magnetic tape, card punch, card reader, and 
printer, and the following error recovery equates are valid. 



DELETE/ 

5472 

NOATMPTS 

EQU 

4 


DELETE/ 

5717,5718 

MAXERASE 

EQU 

11 

CKSMCNST 

EQU 

4 


DELETE/ 

5863,5865 

ATTMPT1 

EQU 

4 

ATTMPT2 

EQU 

8 

BKSPLIM2 

EQU 

3 


DELETE/ 

6048 

TAPES 

EQU 

8 


DELETE/ 

6825 

READB 

EQU 

77 

PRELOAD 

DECK/ 

Pl»P2 


POST LOAD : If the equate LERP is set to 1, error recovery is present for magnetic tape, card 
reader, card punch, and printer, and the following error recovery equates are valid: 



DELETE/ 

3303 

NOATMPTS 

EQU 

4 


DELETE/ 

3508,3509 

MAXERASE 

EQU 

11 

CKSMCNST 

EQU 

4 


DELETE/ 

3655,3657 

ATTMPT1 

EQU 

4 

ATTMPT2 

EQU 

8 

BKSPLIM2 

EQU 

3 


DELETE/ 

4400 

READB 

EQU 

77 
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DELETE/ 4675 

TAPES EQU 8 

POSTLOAD DECK/ p 1? p 2 ,... 

LOADER : If the equate LERP is set to 1, error recovery is present for magnetic tape, card 
reader, card punch, and printer, and the following error recovery equates are valid: 



DELETE/ 

3447 

NOATMPTS 

EQU 

4 


DELETE/ 

3649,3650 

MAXERASE 

EQU 

11 

CKSMCNST 

EQU 

4 


DELETE/ 

3796,3798 

ATTMPT1 

EQU 

4 

ATTMPT2 

EQU 

8 

BKSPLIM2 

EQU 

3 


DELETE/ 

3986 

TAPES 

EQU 

8 

LOADER 

DECK/ 

Pl> P2 >••• 


RDUMP : If the equate SER.OPT is set to 1, error recovery is present for magnetic tape and 
printer and the following error recovery equates are valid: 



DELETE/ 

628 

TAPES 

EQU 

8 

' 

DELETE/ 

927,929 

CARDRDR 

EQU 

0 

CARDPNCH 

EQU 

0 

PRINTER 

EQU 

7 


DELETE/ 

1562 

NOATMPTS 

EQU 

4 


DELETE/ 

1605,1606 

MAXERASE 

EQU 

11 

CKSMCNST 

EQU 

4 
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DELETE/ 

1846,1848 

ATTMPT1 

EQU 

4 

ATTMPT2 

EQU 

8 

BKSPLIM2 

EQU 

3 

RDUMP 

DECK/ 

Pl>P2> • • • 


2.2.3 PRODUCT SET ASSEMBLY AND OPTIONS 

Modification to standard product set members should be made at this time. 
FORTRAN 


If error recovery routines are modified, FORTRAN must be reassembled. Assemble all overlays 
of FORTRAN, including object time routines. Assemble all error recovery decks, making sure 
sizes of routines and BSS blocks in FORTRAN overlays are equal. Assemble the following special 
decks from the system COSY tape: 

FTNO 

PROGNAME 


Use the expanded PRELIB to make a library with the decks set up as follows: 


^SEQUENCE, 001 

JJOB,,,, 

gEQUIP, 55 =MT 

gEQUIP, 01 = MT 

gPRELIB,, 1, S, A 

gSYMROUT 

gRECORD, START2 

^ORIGIN, START2 

FTNO 

RAAR 

SCAR 

MTWPR 

MTRPR 


\ 


/ 


binary decks (must be in this order) 
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MTLDACPR \ 

MTDER 

PRC PR 

CRDER 

CPDER 

MTWPRR 

MTRPRR 

MTLDCPRR 

CMNRTNS 

WHATISIT 

NRD 

NRC 

NWR 

T.NOTRDY 
TYPEOUT. 
WHATKIND 
PROGNAME / 

9 RECORD, START2 


binary decks (must be in this order) 


gORIGIN, START2, (octal size of error recovery routines including FTNO and PROGNAME) 


FTN1 binary deck 
9 RECORD, START2 

^ORIGIN,START2, (octal size of error recovery plus FTN1 routines common to FTN2) 


FTN2 binary deck 
9 RECORD, START2 

gORIGIN, START2, (octal size of error recovery plus FTN1 routines common to FTN3) 
FTN3 binary deck 
gRECORD, START2 

gORIGIN,START2, (octal size of error recovery plus FTN1 routines common to FTN4) 
FTN4 binary deck 
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gRECORD, ST ART 2 
7 

gORIGIN, START2, (octal size of error recovery plus FTN1 routines common to FTN5) 
FTN5 binary deck 
gRECORD, START2 

5)ORIGIN,START2, (octal size of error recovery plus FTN1 routines common to FTN6) 
FTN6 binary deck 
gRECORD, START2 

gORIGIN,START2, (octal size of error recovery plus FTN1 routines common to FTNE) 
FTNE binary deck 

gFILE 

gREPLACE, FORTRAN, FORTRAN 

FORTRAN - binary deck; includes LED card of following form 12 

0 

1 5501,5601 

7 

9 

LED card must immediately follow EPT card with main entry point. 

gREPLACE, FLOVER,Q8QERROR 

FLOVER 
BCDINP 
BCDOUT 
FORMAT 
BINARY 
BUFFER 
UNIT 
IOCHK 
EOFCHK 
TAPEHAND 
PAUSE 
CONTROL 


> 


binary decks 
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DOUBLE 


DFPRIME 

DFP 

Q1QADRI 

ITOJ 

ITOX 

XTOI 

POWRF 

SINCOS 

ATANF 

EXPF 

LOGF 

SIGNF 

SQRTF 

ABSF 


EXTREMA1 

EXTREMA2 

FLOATF 

FIXF 

MASKINGF 
FAULTS 
SENSLITE 
SENSWTCH 
Q8QERROR 

gFILE 

ggend-of-file 


COMPASS 


binary decks 


If a user coded COMPASS subroutine executes with FORTRAN I/O time routines, Q8QBCDWT may 
need to be declared external and called from the subroutine. If the COMPASS subroutine does I/O 
on units used by FTN I/O, a call to Q8QBCDWT is required to check a specified unit for outstand¬ 
ing BCD WRITES before the I/O operation takes place. Q8QBCDWT is a routine in FTN I/O con¬ 
trol that checks for outstanding BCD writes and processes status. 



The calling sequence is: 


lu 

Q 8 QBCDWT 


ENQ 
RTJ 

lu = Number of unit 

If error recovery routines are modified, COMPASS must be reassembled. Assemble all subpro¬ 
grams of COMPASS. Assemble all error recovery decks (program sizes must be identical to the 
size of the BSS blocks at the beginning of each subprogram of COMPASS) and the following special 
decks from the system COSY tape. 

FTNO 

PROGNAME 

Use the expanded PRELIB to make a library. Decks must be in the specified form: 

^SEQUENCE, 001 
§JOB,,,, 

9 EQUIP, 55=MT 
gEQUIP, 01=MT 
9 PREUB, , 1 ,S,A 
gSYMROUT 
l RECORD, ST ART 2 
^ORIGIN, START2 

FTNO \ 

RAAR 
SCAR 
MTWPR 
MTRPR 
MTLDACPR 
MTDER 
PRC PR 
CRDER 
CPDER 
MTWPRR 
MTRPRR 
MTLDCPRR 




binary decks (must be in this order) 
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CMNRTNS 

WHATISIT 

NRD 

NRC 

NWR 

T.NOTRDY 

TYPEOUT 

WHATKIND 

PROGNAME 



binary decks (must be in this order) 


gRECORD, START2 

gORIGIN, ST ART2, (octal size of error recovery routines including FTNO and PROGNAME) 
COMPASS binary deck 
^RECORD,START2 

gORIGIN, START2, (octal size of error recovery decks plus COMPASS subprogram) 

OVERLAY1 binary deck 

^RECORD, START2 
7 

gORIGIN, START2, (octal size of error recovery decks plus COMPASS subprogram) 
PASSONE binary deck 
^RECORD, START2 

^ORIGIN,START2, (octal size of error recovery decks plus COMPASS subprogram) 

PASS TWO binary deck 
SYMTBLE binary deck 

Jrecord,start2 

^ORIGIN, START2, (octal size of error recovery plus COMPASS subprogram) 

CRT binary deck 

^FILE 

^REPLACE, COMPASSB, COMPASSB 

COMPASSB binary deck including LED card of following form: 

12 

0 

15501 

7 

9 


This card must occur after the EPT card with the main entry point and 
before the TRA card. If both 55 and 56 are to be equipped, use a LED card 
with the form: 
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12 

0 

15501,5601 

7 

9 

gREPLACE, COMPASS, CRT 
gUNIT,55, FTNO - 
§UNIT, 55, COMPASS 
§UNIT, 55, OVERLAY1 
§UNIT, 55, PASSONE 
g UNIT, 55, PASSTWO 
§UNIT, 55, CRT 
^FILE 

ggend-of-file 

COBOL 

If it is necessary to reassemble COBOL, place the decks in the following order: 

COBOLIE 

COBOLD1 

COBOLP1 

COBOLD2 

COBOLP2 

COBOLDP3 

COSY 

Assemble the COSY subprograms and use the following PRELIB example to replace COSY on the 
library. 

^SEQUENCE, 001 
gJOB,,,, 

§ EQUIP, 55=MT 

Jequip, 01=MT 

^PRELIB,, 1,S 

7t?tt/f 
9“— 

gREPLACE, COSY, COSYRDWT 
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COSY binary deck 
COSYRDWT binary deck 


gFILE 

ggend-of-file 

BSIPP 

To expand number of operations of BSIPP: 

1. Equate NOPS to the number of operations; NO PS is set to 3 in this release. 

DELETE/ 98 
NOPS EQU 3 

2. Expand the following tables so they contain the number of entries NOPS is equated to. The 
example shown is for NOPS = 3. 



DELETE/ 

2956,2958 

BLIST 

00 

BUF 


00 

BUF+BSIZ2 


00 

BUF+BSIZ 2+BSIZ 2 


DELETE/ 

2959,2961 

B2LIST 

00 

B2BUF,3 


00 

B2BUF+B2SIZ, 3 


00 

B2BUF+B2SIZ+B2SIZ, 3 


DELETE/ 

2963,2965 

RSVLIST 

00 

RSVBUF,3 


00 

RSVBUF+RSVSIZ, 3 


00 

RSVBUF+RSVSIZ+RSVSIZ, 3 


DELETE/ 

2966,2968 

FA LIST 

00 

FABUF 


00 

FABUF+FASIZ 


00 

FABUF+FASIZ+FASIZ 


3. Change the buffer storage area. The example below is the same as the release (NOPS equal 
to 3). 
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BUF 

B2BUF 

RSVBUF 

FABUF 


DELETE/ 2977,2980 
BSS BSIZ 2+BSIZ 2+BSIZ 2 

BSS B2SIZ+B2SIZ+B2SIZ 

BSS RSVSIZ+RSVSIZ+RSVSIZ 

BSS FASIZ+FASIZ+FASIZ 


(BSIZ 2) (NOPS) 
(B2SIZ)(NOPS) 
(RSVSIZ) (NOPS) 
(FASIZ) (NOPS) 


SIPP 

To expand the number of operations of SIPP, change the equate NOPS to the number desired. NOPS 
is set to 3 in this release. 


DELETE/ 120 
NOPS EQU 3 


2.2.4 REPLACEMENT CARD 

The replacement card in the PRELIB Source Deck (section 4.1) is illegal and must be replaced 
with the modified xCICRECl deck. 


2.2.5 BCD, BDP, AND FDP OPTIONS 

RTS/STD/BATCH for 3100/3200 


BCD 

Hardware 

FDP 

Hardware 

Action 

Absent 

Absent 

Remove SEPOINT.BCDBOXS and SEPOINT, FDPBOXS 
Set BDP EQU 0 in xCICREClt 

Absent 

Present 

Remove SEPOINT.BCDBOXS 

Set BDP EQU 0 in xCICREClt 

Present 

Absent 

Remove SEPOINT, FDPBOXS 

Set BDP EQU 0 in xCICREClt 

Present 

Present 

Set BDP EQU 0 in xCICREClt 


In all cases only BCD COBOL may be used. 


t x = S Standard 
B BATCH 
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RTS/STD/BATCH for 3300/3500 


BCD 

Hardware 

FDP 

Hardware 

Action 

Absent 

Absent 

Remove SEPOINT, BCDBOXS and SEPOINT, FDPBOXS 
Set BDP EQU 0 in xCICREClt 

Absent 

Present 

Remove SEPOINT, BCDBOXS 

Set BDP EQU 0 in xCICREClt 

Present 

Absent 

Remove SEPOINT, FDPBOXS 

Set BDP EQU 1 in xCICREClt 

Present 

Present 

Set BDP EQU 1 in xCICREClt 


Where BDP hardware exists and is defined in xCICRECl (BDP EQU 1), BDP COBOL must be used. 
Otherwise BCD COBOL is required. If BDP is equated to 1, the library must always be run with 
the console BDP switch turned on. 

UNDEFINED SEPOINTS 

A SEPOINT card must be inserted directly after the loader record. When only system routines 
(e.g. COMPASS) are absolutized, they are illegal. 

A SEPOINT card is used to prevent the loading of a subroutine or program; if the name specified 
on the control card is undefined, the symbol is equated to ABNORMAL, and the job terminates. 
This technique is particularly useful for installations with optional floating-point and BCD 
hardware. For example, the following cards in file 1 input would prevent loading of hardware 
simulation routines FDPBOXS and BCDBOXS. 

SEPOINT, FDPBOXS 
SEPOINT, BCDBOXS 

Other undefined system entry points (CIP and PERADD) do not invalidate the PRELIB as long as 
no routines reference the undefined SEPOINT. 


2.2.6 DRIVER SELECTION 

In this release, the drivers for all equipments and controllers are included within the STD and 
BATCH PRELIB source decks. 


t x = S Standard 
B BATCH 


enoormnn 
UUiiL) I uvu 


II-2-31 





















DRIVLABT 


Users with a 601, 

TAPE 

The deck card is: 
DRIVLABT 


603, or 606 driver must make the following modification. 

DELETE/ 3 

EQU 606 

DECK/ Pj>P2 > • • • 
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SYSTEM DRIVERS 


Remove the unnecessary drivers. The drivers are identified by unique program lengths on their 
IDC cards and may be removed by cross-referencing the PRELIB Source Deck Listing, part II, 
section 4.1, and the following chart. 


Hardware 

Control Data 
Controllers f 

Control Data 
Equipment - } - 
(in combination) 

COSY 

Name 

Entry Point 
Name 

Deck 

Length 


362x 

604 




MT 

342x 

607 

DRIVLABT 

DRIVER01 

344 


322x 






362x 

601 




MT 

342x 

603 

DRIVLABT 

DRIVER01 

330 


322x 

606 




CR 

3447 

405 

DRIV3649 

DRIVE R0 2 

245 


3649 






3248 





CR 

3142 

405 

DRIV3248 

DRIVER02 

235 


3256 





PR 

3659 

501 

DRIV3659 

DRIVER03 

356 


3152 

505 





3254 





PR 

3555 

512 

DRV512 

DRV512 

406 

CP 

3644 






3446 

415 

DRIV3644 

DRIVER04 

222 

CP 

3245 

425 

DRIV3245 

DRIVER04 

345 

TY 

Console 






Typewriter 

- 

DRIVTYWR 

DRIVER05 

115 

PL 

3293 

Plotter 

DRIV3293 

DRIVER11 

60 

OR 

3195 

915 

DRIVER12 

DRIVER16 

330 

TR 

3691 

Paper Tape 

DRIV3691 

DRIVER06 

625 

TP 


Station 


DRIVER07 



t Registered trademark of Control Data Corporation. 
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The final PRELIB source is generated through the utility routines on an installed system (Tape 
SCOPE 2.4 or RTS 1. 2). To punch the source decks that are not installation dependent: 

Mount release tape 1 and space tape forward one file. This positions release tape 1 at the 
standard PRELIB source. If a BATCH source is desired, space the tape forward one 
additional file. 

Punch the appropriate PRELIB source. 

At this point, the user must decide if BDP COBOL and BDP SORT for the 3300/3500 
are desired. If BDP COBOL and BDP SORT are not desired, skip next step. If a 
standard PRELIB source was punched, space the tape forward one file. 

Punch BDP COBOL and SORT PRELIB source. 

The BDP COBOL and SORT PRELIB source (section 4.1.3) can be used as standard INP 
or can be punched. 


2.3 FINAL LIBRARY GENERATION 

To generate a final RTS library, an installation must have the following materials: 

An operable interim library. 

The autoload program installed in core storage. 

The proper PRELIB source deck (RTS/STD or RTS/BATCH) modified to fit the particular 
hardware configuration. 

The library generation proceeds as follows : 

1. Mount the interim library on physical unit 0. 

2. Mount scratch tapes on physical units 1 and 2. 

3. Mount tape to receive the final library on unit assigned to logical unit 1. 

4. Place the PRELIB source deck in the card reader. 

5. Execute the PRELIB source deck. 

6 . The interim PRELIB will produce the following CTO diagnostics: 

I PLIB 031 PRELIB HISTORY BEGIN 
I PLIB 042 PRELIB HISTORY END 

If any other diagnostic appears on CTO or OUT, the error must be corrected and the 
job repeated. 
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2.4 MMTC ADD-ON TO RTS 2.0 SYSTEM 


After the initial release of RTS 2.0, new capabilities have been added to the system. This section 
provides sufficient information to add these capabilities to an existing RTS 2. 0 system. 


2.4.1 DRIVMMTC 

DRIVMMTC is the driver for the 3518/3528 Modular Magnetic Tape Controller (MMTC) and the 
657/659 Magnetic Tape Transports. 


Release Materials 

The release materials will be on punched cards in the following form: 

COSY changes for CIO 

COSY changes for xCICRECl (x=S or B) 

COSY changes for RDUMP 
COSY changes for PRELOAD 
COSY ch an ges for LOADER 
COSY changes for POSTLOAD 
COSY changes for ERROR RECOVERY 
COSY formatted deck of DRIVMMTC 
COSY formatted deck of MMTCINIT 
Binary deck of MMTCINIT 


T657 Assembly Option 

Definition: The T657 option permits those installations with 657 Tape Transports to utilize them 
through software modifications. 

Option: 

DELETE/ 120 
T657 EQU n 

n = number of 659 Tape Transports 

Release Value: T657 = 1 


T659 Assembly Option 

Definition: The T659 option permits those installations with 659 Tape Transports to utilize them 
through software modifications. 
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Option: 


DELETE/ 122 
T659 EQU m 

m = number of 659 Tape Transports 

Release value: T659 = 1 

Installation Procedures 

1. Select and set assembly options according to configuration. 

2. Assembly DRIVMMTC. 

3. Generate changes necessary for AET (part III, section 2). 

4. Assemble CIO, xCICRECl, RDUMP, PRELOAD, LOADER, POSTLOAD, where x is 
B = Batch or S = Standard. 

5. Apply COSY changes to ERROR RECOVERY at 5 locations. 

6 . Edit PRELIB SOURCE by inserting the binary decks and files from the above steps. 

7. Execute the edited PRELIB SOURCE. 

8 . Initialize MMTC (see below). 

9. Autoload and verify new system. 

MMTC Initialization 

The image memory of the MMTC (3518 or 3528) must be loaded before tape operations can be 
executed. The procedure requires the following steps: 

1. Separate the MMTC initializer binary program from the MMTC release materials. 

2. Obtain a one-card loader (part II, section 9). 

The image memory initializer program contains the CDC 64 character subset of ASCII for the 
image memory and several subroutines necessary to extract the configuration of the MMTC 
and physically write the image memory. 

3. Place the one-card loader followed by the binary deck of the image initializer in the 
card reader. 

4. Autoload from the card reader. 

The computer types: 

A MMTC 001 C(c)E(e)U(uu) 

5. Type the appropriate channel c, equipment e, and unit numbers uu for MMTC. 
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The program will attempt to initialize the image memory. If successful, the following message 
is typed: 

I MMTC 005 IMAGE MEMORY LOADING COMPLETED 

NOTE 

If the user has a 3528 controller this procedure will be 
repeated so that both image memories (one per channel) 
can be initialized. 

If unsuccessful, one or more of the following will be typed: 




Message 

Significance 

Action 

I 

MMTC 

003 

IMAGE MEMORY 
PARITY ERROR 

xxxx 

xxxx=WRITE Parity error 
occurred during write of 
image memory 

xxxx=READ Parity error 
occurred during read 

Retry 

If error continues, the con¬ 
troller should be examined 
for hardware malfunction. 

I 

MMTC 

004 

UNEXPECTED 
STATUS WORD 

II ssss 

ssss=status in octal. Ab¬ 
normal condition (other 
than memory parity) 
occurred. 

Retry 

If error continues, the con¬ 
troller should be examined 
for hardware malfunction. 

1 

MMTC 

006 

XXX REJECTED 

yyyyyyyy 

xxx=CON connect 

SEL select 
yyyyyyyy= r ejected 

instruction in 

octal 

1. Press FINISH to restart 
initializer, or 

2. Press REPEAT to retry 
rejected function. 

1 

MMTC 

007 

IMAGE MEMORY 
zzzz REJECTED 

zzzz=INPW Input word in¬ 
struction rejected 

zzzz=OUTW Output word 
instruction rejected 

1. Press FINISH to restart 
initializer, or 

2. Press REPEAT to retry 
rejected function 

1 

MMTC 

008 

CONTROLLER 

BUSY AFTER 10 
SECONDS 


1. Press FINISH to restart 
initializer, or 

2. Press REPEAT to continue 

to wait 

I 

MMTC 

009 

IMAGE MEMORY 
LOADED INCOR¬ 
RECTLY 

After image memory was 
initialized, it was read, 
and the returned image 
differs from the image 
that was written. 

Retry 

If error continues, examine 
controller for hardware 
malfunction. 
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A copy of the image memory initializer is provided in COSY format to allow the user to select a 
code set other than CDC 64 character subset of ASCII after installation is completed. If the pro¬ 
gram is utilized this way the following message will be typed if two BCD codes have the same 
8 -bit code equivalent: 


Message 

Significance 

Action 

I 

MMTC 

002 

DUPLICATE CONVERSION 

Two BCD codes have 

the same 8-bit code 

xx = character 1 
yy = character 2 
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INCORPORATING PRODUCT SET MEMBERS 


The installation of some members of the RTS product set is generated through separate sets of 
procedures because: 

The products involved are special applications programs or use special applications 
equipment that some users may or may not have or need. 

The procedures depend on the existence of a fully operable RTS final library. 

The procedures that follow involve installation and generation of: 

SAINT 
ADAPT 
PERT Time 
PERT Cost 

3.1 SAINT 

SAINT is released on COSY tape. Use the following sample procedures to add SAINT to an RTS 
library: 

1. Mount RTS tape on physical unit 00 and scratch tape on physical unit 01. 

2. Mount COSY tape on logical unit 01, scratch tape on logical unit 02. 

3. Create and run a card deck of the following form: 

JOB 1 


Job 1 assembles according to options selected. A 16K simulator with multiply and divide example 
is given here. COMPASS assembles Hollerith tape 02. The example is a listing of a SAINT 
binary deck with options selected. 


^SEQUENCE, 001 
gJOB-SAINT-COSY, 
gEQUIP,01= MT, 02 = MT 
COSY 



DELETE/ 

39,41 

DIVIDE 

EQU 

TRUE 

MEMIZE 

EQU 

16000 

MULTIPLY 

EQU 

TRUE 

SAINT 

DECK/ 

1 = 01, 


Option examples 
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ENDCOSY/ 

JcOMP ASS,1 = 02, L,R,P 
ggend-of-file 


JOB 2 

JOB 2 inserts a binary image of the binary deck from JOB 1 on scratch logical 01 at the beginning 
of file 2 as given in the example. 

gSEQUEN CE, 002 

gJOB, SAINT-LIB,, 

gEQUIP,01 = MT (new system tape) 

gPRELIB, ,01 

gFILE 

gINSERT 

SAINT binary deck 

gFILE 

ggend-of-file 
4. Load RTS. 

3.1.1 ASSEMBLY OPTIONS 

The following table provides the COSY sequence number, SAINT core requirements, and the name 
of the assembly parameters that must be equated to TRUE to select the various options in SAINT. 
For a complete description of assembly options see appendix A of the 3100/3200/3300/3500 SAINT 
Reference Manual, Pub. No. 60213700. 
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Sequence Number 


Name 


Core Required (decimal) 


30 

ADDRTABL 

288 

31 

BRANBIT 

20 

32 

COLBIN 

306 

33 

COMPRESS 

88 

39 

DIVIDE 

123 

40 

MEMSIZE 

4K - 2000| 

8 K - 4000t 

12K - 6000f 

16K - 8000f 

41 

MULTIPLY 

90 

43 

SIM140 3 

-7 

44 

SIM1407 

236 

46 

STERLING 

1386 

47 

TRACEDMP 

293 

48 

TRANSLAT 

101 

49 

WMIO 

195 

50 

WMBL 

151 


For WMBL, WMIO must be equated to TRUE. If WMIO is TRUE and WMBL is nonzero, tape word 
mark I/O is performed in a non-time-dependent manner. This can be equated to the minimum 
number of characters desired in the input/output buffer. When using word mark I/O, if WMBL is 
equated to the maximum number of input or output characters, no density (tape) restrictions apply. 
However, if WMBL is equated to FALSE, the following restrictions apply: 

3200/3300 601, 603, 604 tape transports, no density restrictions. 

606, 607 tape transports, restricted to 200 BPI. 

3100 Restricted to 200 BPI for all tape units. 


t The simulation of SAINT memory requires half the nonsimulated core size. 
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3.1.2 CORE REQUIREMENTS 


Use the following equation to find total core size of SAINT: 

st = 2510 + inems iz e + so + WBjbl 

st Total core requirement for SAINT 

so Total of option core reqirements 

wmbl Size of word mark buffer length (variable) 

memsize Size of simulated memory 

3.2 ADAPT 

The ADAPT release consists of two packages, one for 16K and one for 32K. 

Each package consists of: 

A binary (load-and-go) tape from which to make ADAPT overlay tape. 

A set of operating procedures. 

Also available are: 

A BCD tape of the ADAPT source decks 
ADAPT Internal Maintenance Specifications 

ADAPT operates from an overlay tape made from the binary tape furnished as a part of the 
ADAPT system release, or from decks punched from the tape. 

A deck of test programs is provided to ensure successful production of the overlay tape. Sample 
output from these programs is included in the appendix of the ADAPT Internal Maintenance 
Specifications. A single run is required to create the overlay tape and test the sample part 
programs. 


3. 2. 1 16K ADAPT PREPARATION 

1. Mount ADAPT source tape on logical unit 01. 

2. Mount scratch tapes on logical units 02 and 03. 

3. Run the following job: 

gSEQUENCE, 001 
gJOB,, , , 
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\ EQUIP, 01 = MT, 03 = MT 
5[fORTRAN,I = 01,P = 02,L = 03 
gCOMPASS,I = 01,P = 02, L = 03 
^FORTRAN, 1 = 01, P = 02,L = 03 
gCOMPASS,I = 01,P = 02,L = 03 
gFORTRAN,I = 01, P = 02, L = 03 
^end-of-file 

4. Punch binary decks from logical unit 02 and list source from logical unit 03. 

5. Duplicate the following binary decks: 


Deck 

Sequence number 

Copies 

STDPACK 

0110 

1 

STDUNPK 

0111 

1 

PTRIT 

0125 

1 

GENPLN 

0223 

1 

ZVECT 

0224 

1 

ZVALUE 

0225 

1 

DOT 

0227 

1 

CROSS 

0226 

2 

LENGTH 

0228 

1 

NORM 

0229 

2 


Place routines STDPACK, STDUNPK in the main portions of OVERLAY1 and OVERLAY2. 

Place PTRIT in segments 2 and 3 of OVERLAY2. 

Place the second copies of CROSS and NORM in OVERLAY4. 

6 . Set up the overlay deck structure: 

^SEQUENCE, 001 
gJOB,,,, 

9 EQUIP, 05 = MT, 06 = MT, 07 = MT 
gEQUIP,49 = 06 
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12 

049 

7 

9 

binary decks for MAIN OVERLAY 

CDCADAPT 

INITIAL 

PRCNTL 

LBSRCH 

TAPERD 

TAPEWT 

12 

0 

349.1 
7 

9 

binary decks for OVERLAY 1 

PASS1A 

ITYPE 

DOMAC 

PTIDENT 

ERRMSG 

BCDFETCH 

JUGGLE 

NUMSTOR 

STDPACK 

STDUNPK 

12 

0 

249.1 
7 

9 

binary decks for OVERLAY 1, SEGMENT 1 

P1ASEG1 

CARDBKUP 

PTGEN 

SERCHV 

m A t> t nTr 
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12 

0 

249.2 
7 

9 

binary decks for OVERLAY 1, SEGMENT 2 

P1ASEG2 

POSMACH 

MACDEF 

CAWL 

TERMAC 

RSERV 

PTRIT 

249.3 

l 

binary decks for OVERLAY 1, SEGMENT 3 

P1ASEG3 

COMPUT 

IFJUMP 

PTRIT 

GEOM1A 

FINI 

12 

0 

249.4 
7 

9 

binary decks for OVERLAY 1, SEGMENT 4 

P1ASEG4 

TABLSET 

XABLE 

YABLE 

12 

0 

349,2 

7 

9 
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binary decks for OVERLAY 2 

PASS IB 

PTID 

TABLSIB 

ERRMSG 

STDPACK 

STDUNPK 

CANGET 

CANPUT 

DEFPRE 

12 

0 

249.1 
7 

9 

binary decks for OVERLAY 2, SEGMENT 1 

SEND 

BCDINF 

FINIB 

MISC 

PSIS 

POKE 

RITA PE 

MOTION 

PREPRO 

TABCO 

QUAD 

RFCTF 

SSQRF 

PPARAM 

12 

0 

249.2 
7 

9 

binary decks for OVERLAY 2, SEGMENT 2 

JDSEG2 

GENPLN 
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ZVECT 

ZVALUE 

CROSS 

DOT 

LENGTH 

NORM 

LINE01 

LINE02 

LINE03 

LINE04 

LINE05 

LINE06 

LINE07 

LINE08 

LINE09 

PLANO 1 

PLAN02 

PLAN03 

ELLP01 

ELLHYP 

GCONOl 

MATX01 

MATX02 

MATX03 

MATX04 

12 

0 

249,3 

7 

9 

binary decks for OVERLAY 2, SEGMENT 3 

JDSEG3 

GENPLN 

ZVECT 

ZVALUE 

CROSS 
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DOT 

LENGTH 

WORM 

PONTOl 

PONT02 

PONT03 

PONT04 

PONT05 

PONT07 

CIRL01 

CIRL02 

CIRL03 

CIRL05 

CIRL08 

CIRL09 

CIRL10 

CIRL11 

CIRL12 

12 

0 

349,3 

7 

9 

binary decks for OVERLAY 3 

CALLSEG2 

SUPER 

AMINDX 

DDSTX 

UNRMALX 

AERRX 

ASTOSX 

CENTRX 

RADARX 

CPLANX 

CCURVX 

DELTAX 
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ARLMG 

TLNORMX 

CHECKX 

QUADX 

ATAPEX 

UNORMX 

STRTUPX 

AJUNDDX 

AREPREX 

12 

0 

249.1 
7 

9 

binary decks for OVERLAY 3, SEGMENT 1 

CALLSEG1 

SECTN2X 

12 

0 

249.2 
7 

9 

binary deck for OVERLAY 3, SEGMENT 2 

ARLMCL 

12 

0 

249.3 
7 

9 

binary decks for OVERLAY 3, SEGMENT 3 

CALLSEG3 

UNTABC 

DDTABC 

12 

0 

349.4 
7 

9 

binary decks for OVERLAY 4 

PICKPOCK 

POCKET 

ATAPEY 
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ASTOSY 

AERRY 

WORM 

CROSS 

12 

0 

349.5 
7 

9 

binary decks for OVERLAY 5 

PASSB 

CLPRNT 

SEARCH 

IFIXED 

MULTM 

TSFMPT 

TSFMVC 

MATMOV 

TABFCT 

12 

0 

349.6 
7 

9 

binary decks for OVERLAY 6 

SECTN4 

DISPAT 

12 

0 

249, m 

7 

9 

binary deck for post processor; each post processor is a segment 
9 RUN 

^end-of-file 

7. Mount a tape for the overlay tape on logical unit 49. 

8. Mount scratch tapes on logical units 05 and 07. 

9. Place above overlay structure in card reader and load. Upon completion of run, remove the 
write ring from the overlay tape. 
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3.2.2 16K ADAPT EXECUTION 


1. Mount overlay tape on logical unit 49 and scratch tapes on logical units 05 and 07. 

2. Place the following job deck in the card reader and load: 

^SEQUENCE, 001 
9 JOB,,, 

^EQUIP, 49 = MT, 05 = MT, 07 =MT 

binary cards for MAIN OVERLAY (see preparation) 

9 RUN 

part programs 

*** (end of batch card) 

^end-of-file 

3. Printed output is on logical unit 61. 

4. Duplicate the following binary decks: 


Deck Name 

Sequence Number 

Copies 

STDPACK 

0110 

1 

STDUNPK 

0111 

1 

PTRIT 

0125 

1 

CROSS 

0226 

1 

NORM 

0229 

1 


Place STD PACK and STDUNPK decks in main portions of OVERLAY 1 and OVERLAY 2. 

Place PTRIT deck in OVERLAY 1, SEGMENT 2 and SEGMENT 3. 

Place CROSS and NORM decks in OVERLAY 4. 

5. Set up the following deck structure: 

^SEQUENCE,... 

9 J OB.... 

JeQUIP, 05 = MT, 07 = MT 
§EQUIP, 06 = MT, 49 = 06 
12 

^49 (main) 

9 
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©COt -Oi 


binary decks for MAIN OVERLAY 
CDCADAPT 
INITIAL 
PRCNTL 
LBSRCH 
TAPERD 
TAPEWT 
FLOVER 

12 

, 1 (overlay 1) 


binary decks for OVERLAY 1 
PASS1A 
ITYPE 
DOMAC 
PTIDENT 
ERRMSG 
BCDFETCH 
JUGGLE 
TABLSET 
NUMSTOR 
STDPACK 
STDUNPK 
XABLE 
YABLE 

2 

2«,1 

7 

9 

binary decks for OVERLAY 1, SEGMENT 1 
P1ASEG1 
CARDBKUP 
PTGEN 
SERCHV 
TABLCK 
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0 

249.2 
7 

9 

binary decks for OVERLAY 1, SEGMENT 2 
P1ASEG2 
POSMACH 
MACDEF 
CAWL 
TERMAC 
RSERV 
PTRIT 

12 

0 

249.3 
7 

9 

binary decks for OVERLAY 1, SEGMENT 3 
P1ASEG3 
COMPUT 
IF JUMP 
PTRIT 
GEOM1A 
FINI 
lg 

349,2 

7 

9 

binary decks for OVERLAY 2 
PASS1B 
PTID 
TBLS1B 
ERRMSG 
STDPACK 
STDUNPK 
CANGET 
CANPUT 
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0 

249.1 

7 

9 

binary decks for OVERLAY 2, SEGMENT 1 
SEND 
BCDINF 
FINIB 
MISC 
PSIS 
POKE 
RITAPE 
MOTION 
PREPRO 
TAB CO 
QUAD 
RFCTF 
SSQRF 
PPARAM 

12 

0 

249.2 
7 

9 

binary decks for OVERLAY 2, SEGMENT 2 
DEFPRE 
JDSPAT 
GENPLN 
ZVECT 
ZVALUE 
CROSS 
DOT 
LENGTH 
NORM 
PONTOl 
PONT 02 
PONT03 
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PONT04 

PONT05 

PONT07 

LINE01 

LINE02 

LINE 03 

LINE 04 

LINE05 

LINE06 

LINE07 

LINE08 

LINE09 

PLAN01 

PLAN02 

PLAN03 

CIRL01 

CIRL02 

CIRL03 

CIRL05 

CIRL08 

CIRL09 

CIRL10 

CIRL11 

CIRL12 

ELLP01 

ELLHYP 

GCONOl 

MATX01 

MATX02 

MATX03 

MATX04 

12 

0 

349,3 

7 

9 
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binary decks for OVERLAY 3 
CALLSEG2 
SUPER 
AMINDX 
DDSTX 
UNRMALX 
AERRX 
ASTOSX 
CENTRX 
RADARX 
CPLANX 
CCURUX 
DELTAX 
ARLMG 
SNAP 
TLNORMX 
CHECKX 
QUADX 
ATAPEX 
VNORMX 
STRTUPX 
AJUNDDX 
AREPREX 

12 

0 

249.1 
7 

9 

binary decks for OVERLAY 3, SEGMENT 1 
CALLSEG1 
SECTN2X 

12 

0 

249.2 
7 

9 
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binary decks for OVERLAY 3, SEGMENT 2 
ARLMCL 


0 

249.3 

7 

9 

binary decks for OVERLAY 3, SEGMENT 3 
CALLSEG3 
UNTABC 
DDTABC 

12 

0 

349.4 

7 

9 

binary decks for OVERLAY 4 
PICKPOCK 
POCKET 
ATAPEY 
ASTOSY 
AERRY 
NORM 
CROSS 

12 

0 

349.5 

7 

9 

binary decks for OVERLAY 5 
PASS3 
CLPRNT 
SEARCH 
IFIXED 
MTJLTM 
TSFMPT 
TSFMVC 
MATMOV 
TABFCT 
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12 

0 

349,6 

7 

9 

binary decks for OVERLAY 6 
SECTN4 

dispat 

12 

0 

249, m 

7 

9 

binary decks for post processor (each post processor added comprises 
a segment) 

§RUN 

test part programs 
ggend-of-file 

6. Mount tape for overlay tape and scratch tapes as specified on the EQUIP cards. Load 
overlay deck structure into the card reader and execute the job. 

7. Upon completion of the run, remove the write ring from the tape on logical unit 49. This is 

.ie overlay tape to be used for running part programs. 

3.2.3 32K ADAPT PREPARATION 

1. Mount ADAPT source tape on logical unit 1 and scratch tapes on logical units 2 and 3. 

2. Place the following job in the card reader: 

^SEQUENCE, 001 
§JOB,,,, 

gEQUIP,01 = MT,02 =MT,03 = MT 
gFORTRAN,I-01, P = 02, L = 03 
gCOMPASS ,I = 01,P = 02,L = 03 
^FORTRAN, I = 01, P =02, L = 03 
gCOMPASS, I = 01, P = 02, L = 03 
gFORTRAN ,I = 01,P = 02,L = 03 
ggend-of-file 

3. Punch the binary cards from logical unit 02 and list from logical unit 03. 
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3.2.4 32K ADAPT EXECUTION 

1. Mount overlay tape on logical unit 49. 

2. Mount scratch tapes on logical units 05 and 07. 

3. Place the following deck in the card reader and load: 

gSEQUENCE,... 
gJOB, ... 

I EQUIP, 0 5 = MT, 07 = MT 
^EQUIP, 49 = MT 

binary decks for MAIN OVERLAY (see preparation) 

Jrun 

part programs f 
ggend-of-file 

4. Printable output is produced on logical unit 60. 

3.3 PERT TIME 

The release materials for PERT Time consist of two tapes and two binary main decks. One tape 
and deck is for use under a 16K system, the other for a 32K system. The 16K and 32K variant 
tapes have the same structure. A 16K variant batch library with no options requires 12.3K of 
core. A 32K variant requires 24.3K of core. The first file is a binary LGO file. The second is 
made up of images of source cards and control cards which, when mounted as standard input, 
punch the main program, generate listing of source, and produce an LGO file that is the same as 
that given in file 1. 


3.3.1 CREATE OVERLAY FROM FILE ONE OF RELEASE TAPE 

The following control cards create an overlay tape from the binary LGO tape. Mount the release 
tape on logical unit 56. The overlay tape will be created on logical unit 55. 

gSEQUENCE, 001 
gJOB,,,, ND, NP 


f When using a tabcyl as a drive surface and a second overlapping tabcyl as a check surface, 
execution errors may occur because of the nature of information given in this particular situation. 
Using an intersecting line as a check surface to pass from one tabcyl to the other provides a 
means of bypassing this trouble spot. 
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$ EQUIP, 55 =MT, 05 = 55 
^EQUIP,56=MT 
^LOAD, 56 
gRUN 

ggend-of-file 

After the job creates an overlay tape, it loads overlay 1 and the job terminates. When the overlay 
tape is used to run the PERT Time run, it must be used with the library it was created on. 


3.3.2 CREATE OVERLAY AND FOLLOW WITH COMPUTER RUN 

The following control cards create an overlay tape followed by a computer run. 

^SEQUENCE, 001 
gjOB,,,,ND,NP 

gEQUIP,56 =MT (Mount release tape on logical unit 56) 
gEQUIP,55 =MT (Logical unit 55 will be overlay tape) 

^EQUIP, 05 =55 

^EQUIP, 1 = MT, 2 =MT, 3 = MT (PERT work tapes) 

JLOAD, 56 

Jrun 

(PERT control cards) 


STOP 

ggend-of-file 

The following control cards generate PERT Time reports with a previously created overlay tape. 

^SEQUENCE, 001 
?JOB,,,,ND,NP 

gEQUIP, 05 = MT (Mount overlay tape, logical unit 5) 
gEQUIP, 1 =MT, 2 = MT, 3 =MT (PERT work tapes) 


(binary PERT Time main deck) 
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gRUN 

(PERT control cards) 


STOP 

jj^end-of-file 

3.4 PERT COST 

The release materials consist of a two file tape and a binary card deck of PERT Cost MAIN. The 
first file of the tape is a binary LGO file. The second file is made up of source cards and control 
cards which when mounted as standard input, punch the main, generate a listing of the source, and 
produce an LGO file that is the same as that given in file one. 


3.4.1 CREATION OF OVERLAY TAPE 

The following deck structure generates a PERT Cost overlay tape on logical unit 55. 

^SEQUENCE, 001 
9 JOB,,, ,ND,NP 
C)EQUIP,55 =MT,05 =55 

^EQUIP, 56 = MT (Mount release tape on logical unit 56) 
gLOAD, 56 

Jrun 

ggend-of-file 

After overlay tape has been created, PERT Cost is loaded and then terminates with the following 
message: 

T CONTROL CARD MISSING 
PERT Cost processing can begin. 

The following job structure is set up to execute a PERT Cost run. 

^SEQUENCE, 001 
gjOB,,,,ND,NP 

§EQUIP,05=MT (Mount OVERLAY tape on logical unit 05) 
gEQUIP, 1 =MT, 2 = MT,3 =MT (PERT work tapes) 
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(binary PERT Cost main deck) 


gRUN 

(PERT Cost control cards) 
ggend-of-file 

The PERT Cost run must be run under the same library that created the overlay tape. 
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RELEASE RELATED AIDS 


4 


4.1 PRELIB SOURCE DECK LISTINGS 


4.1.1 PRELIB SOURCE FOR STANDARD 


C.C. StuUtwCt »U0<2 
C.C. J0o» * * » f 

C•C• toOIP*bb=MT»U5=Sb 
C.C. C.OUIP* i=M 1 
C.C* HKtLlOMl 
C.C. REPLACE 
C«C. KtCOKO * U 


c* c. 

iUC 
iUC 
luC 
loC 
toC 
luC 
luC 
IOC 
loC 
ioC 
loC 
i oC 
iOC 
luC 

c. c. 

C.C. 

c.c. 

lUC 

c.c. 


ORIGIN * u 


ZtKU 

CIO 

OK 1 \/EHU 1 
Ok I£Kui 
OKIVtKUZ 
OKiVtKU^ 
OKlVtKUi 
0 KVbi 2 
OKiV ERO A 


KK00»LtN0TH=0UuoU 
PKOG. L£N.GTH = U 1 Oil 'd 
PROG.L£NGTrt=OOd*4 
PROo.LlNG TH=uU3ou 
PROG.L£NGTh=Ou2*o 
PK0o.LtNGTH=002;>b 
PROG.L£NGTH=003bb 
FK0G*L£NGTH=U0 4 *Uo 
PK0G.LENGTH=u’U222 


l)HI vt£Kv/4 PnOG.L£iMGTn = Uu 
OKi^tHub PkOo.LEngTh-OUI ib 


OKivtKii PKOG.L£NGTrt=yO oou 
DKIV£Hi2 PROG.lEnGTh-uugou 
OK iv 3o^i PR0G.LtNGTH=0UOEb 
REPLACEMENT 
REC0R0.START2 
uKibliM*STAHT2 

KUOMp PK0G.L£NoTri=uUbOA- 

KLCOKO » SI AH12 


C*C. OKIGIN * b T AH T2 


tAb LOUF = S fAH 12 

luC PkELOmu PROG.LtNGiH=iiI id 

tAS £NOPHOr=POSiL0A0 

C.C. KtCOKO*bTAHT2 

C*C« OKlGIN»bI AHT2 

iOC Cf\Kt.C PKOG.Lt.tMOT rt s OUUoo 

tAb CIoPCmLL = ABNORMAL 

iUC LOMOtH PHOG. LttMGTH = 04 /ib 

C.C. bt-POitM I jriCOdUXS 

C.C. ScPOiNr.FOPdOXS 

C.C. StPuiwi *At>tMOKMAL 


C.C. SEPuIim I ♦mCCOUnTS 
C.C. btPO i n I * mE T 
C*C. SEPUJOm i VdERRADU 
C.C. btPOiiMj ♦dNtAl T 


C.C. btPOiiMT »tii\KUiMFLG 
C*C* bt.Pu i iM i » t>N J • 

C*C. btPUilM f ♦HHH I 


C.C* btPUiiMi ,CiO 
C.C. btPOliN I ♦CIC3.01 


C . O • btKOii\tf*CiP 
C*C* St-PUiiM f *Ci 1 
c.c. b£POi(M| ,ciT. hTk 

c.c. bfc.POj.iMi *Cbi 


PmGL i 


INSERT OECK OF SCIC 
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H*Gt d 


C.C. StPOiwi 9 U1N T • 

c • c • st^oiu I’ftiN'r# 

C.C. btHOiix i 9 £S r 
L.C. ScHUiNI.GUKLG 
C*C. bt.HOIN F »LOau£H 
C-C- otHUlwhLoCb 
C.C. SfcHOlrtTtMLMOKY 
C.C. StKOilX I *Ml«KttUU 
C«C* St.HUliM I *l^iioU£ 

C • C • bEHOXGTtnXFuKAUU 
C.C. StVOiWTtWUtXlT 
C.C. SEHOXg T »PlkhIaDU 
c-c. i)£HOiiNT 9 HUCKf -1 

C»C* SEHOIwT9Nrt I 

C.C. SfcHOlHi»KAO 

C.C. btHuin I *b Fak I 2 

C.C. S£HUi»si T*Ubl 

C.C. HtCuKufCb X LG FH 

C*C* UKiGXG 9 LSfLGTH 

iuC OVHKU HHOG* L£Gt>TH= 0 <iGuo 

C«C* KtCOKU 9 B X iMrJUF 

C * C . UHXGX ■'i 9 tt I •'jfi (JF 

ICC HRUltCl HKUG.LcHG rH = 0U£ Fb 

iuC HOSILUhU HKOG .LCNGTHsuGu .1 *9 

C.C. KtCOKU 9 b JAR fc 

C»C« UKXGi J 9 b f AH I d 

ic-c Find HKOG.LENGrti=u 0 uu<-! 

luu Rmmk HKuG « LckG |H = 0 u u'+o 

XUC SCAH HKOG.LENGTH=0Ub40 

iUC Hl*HR KHuG.L£GGTH = uUuiu 

ICC "liKHrt FKUC.Lt»NGrH = UUU^u 

iUC *1 TLUACPH HHOG.LtfxGTH=(j0u i 0 
XUC MIULK HhUG.LtHGTH = uOU^U 

XUC PHCFk FKOG.L£KGrH=OOoXn 

XUC CHUCK PKCKj.LfcNGTHsOOU^i 

iuc chuck hkog.llkgth=ouH 3 

lC'C MrwHKhj HHOG.LtNGrH=UUJJb 

ice mTkhkh hkoo.lengthsou^ia 

IUC MTLUCHKR HROG.Lt*GTH=UUi£J 
I L-C CHiNjHTtMS HKUG.L£NG rH = UU^ / 0 
iuc whaUSXT HKOG.LfcNGTH=UUG-JJ 
XUC -MKU RROG.L£HGTH=00 id?. 

XUC NKC HKOG.LtJGTH=U0ii£ 

XUC NWK HKOG.Lt*MGTH=00U3<9 

IUC TaNUTKUY HKOG *LE*NGTH=UUuG£! 
XUC TYHCOOI, HKOG.LCNGrH=UUdu l 
IUC tfHATKlNU HKOG.L£N 6 Trt = OOUJ f 
XUC PrtOGiMAi'IC HKOG.Lti^G rH = UUU UA 
C.C. KtC 0 KU 9 SfAR T? 

C.C* UKlGXG9biAKlle!*3<'!U7 

XUC COMHASG HKUG.Lt IN <GTH=lUXu f 

C.C. HtcOHU 9 SIAR f? 

C«C. UK1GXK9G I AKTii9 XUXU7 

iuC OvtKLAYi HHOG.LEGGTH 3 !^!^^ 

C*C. KtCOHU 9 STARTS 
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pMOt 3 


C.C. UKH3iN,srAHr2*10iU7 

IuC PmSSONE PKUU • LtNO TM s i 02 b i 

C*C. KEC0K0,5l4Kl2 

C.C* OKi(ii n» S f AH 12* 10 X0 f 

iuC PmSSTWO PKOU#Ltt'*tiTH = lb 4 fo6 

iUC SYMlBLt PKUvj.LtNviTrlsuUUUl 

C.C. KtCOHU*3TAK12 

C = Co 0 H JL v3 i M 9 i> V AH (2 5 10X0 7 

IUC CHI' PH00*L£N0TH=12uU6 

C.C. KuCUKU,3 FaH 12 

C.C. OH A 13 i iM * 3 I AK f2 » 3207 

IOC FI Hi FKOO*LENOTH=l ?y (3 

C • C • Hfc.C0KU»3 fAHT2« 

C «C • UKiijlN*31 mHT 2* i 1234 

100 F f»M2 „ PHOO.LEnuTH= lbOo3 

C.C. KtCuHU » 3 IAK I 2 

C»C • OK 1(3IK,*i> i AkT2»43SS 

iuC FTnj PHOo.LEKorH=12oot> 

C.C. HtCOHO*bfAKT2 

C«C. UKiOiN* 3TAH I 2>43bb 

IUC F I N4 PH0u*LENtiT'r1 s lSt>'+j. 

C.C. HEC0HO,STmHT2 

C.C. UKl(3lN*3 I AH 12*443 7 

iuc F i Nb PHuO»LtKvaTH = i3A-o3 

C-C. KECUHU,3IAHT2 

C • C • OKI ‘3 1N ♦ 3 I mk I 2 *443 1 

IUC FI 40 PH00.LEN(3TH=li Foy 

C«C. KtCOHO»STAHf2 

C • C • UKilii N , 3 I AR T2 *434 J 

IOC FVNfc PKOO.LtNOFH=ib222 

C • C . I- X LE 

C•C• HtPLACE 

(i • C • UN 1T » 3D ♦ HDUMP 

C • C • UNi f ,03 ?PHtLOAO 

C«C. UiMi fObtCKKEC 

C•C• uNiT * ob»OVPKO 

C • C • UNlT»bb*PKOTECT 

1L‘C COcIPmSSO PKlHi*LEN(jrn = 0OU32 

Lt-u bbul 

C•C• UNiT»bb»PKUTtCT 
C.C. UNir *3b*FINU 
C.C. UNiT*bb*COMPASS 
C.C. UrU 1jbbtOVtHLAYl 
C*C. UNiT*bb*P mSSON£ 

C * C• UNif*bb»PASST#0 

C.C- UNir*bb*CHT 

iuC FOH IHaN PKOG,LENOTH=U04o2 

Ltu bbO I»bbti 

C.C. UNIT * bb * PKOIECT 

C• C. Ui'li rtbb»FT iMU 

C«C. ONiT * bb*FINl 

C.C. UNif»bbtFTN2 

C.C. On iT>bb*F fN3 

C.C* ONiT * bb * F T N4 

C•C• UNIT »bb,FINb 
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c.c. 

UnIT * bb *FfNb 

c • c • 

unit * b5 * 

FTnE 

IOC 

COBOL 

PHOG.LENGTH=0l2ui 

led 

S4U1*bS01 

IOC 

RAAH 

PROG.LENGTH=OOU«+;J 

IOC 

SCAR 

PHOG.LENGTH=OU J**0 

I DC 

mtwpr 

phog.length=oooio 

IOC 

mtrpr 

PROG.LENGTH=OOOBo 

I DC 

mTLUmCPh 

PROG.LENG TH=00U10 

iuc 

MTUEH 

phog.length=ooo2u 

luc 

PRCPR 

PHOG.LENGTH®000ib 

IUC 

crder 

PROG*LENGTH=UOO‘+i 

IOC 

CPDEH 

PROG.LENGTHsOUIIB 

IUC 

MTWPRR 

PROG.L£NGTh=00335 

IOC 

MTRPRR 

PROG.LENGTd=002i4 

1 DC 

MTLOCPHR 

PROG.LENGTH=OOI<i3 

iuc 

cmnrtns 

PRQG.LENGTH®002 (0 

IOC 

WHA1ISIT 

PROG.LENGTH®00333 

iuc 

NRD 

PROG.LENGTH®00122 

IUC 

NHC 

PHOG.LENGTH=OOii2 

iuc 

NWR * 

PROG.LENGTHSQUJ34 

iuc 

T.NOfRUY 

PHOG.LENGTH=OOU32 

IUC 

TYPEOUT. 

PHUG.LENGTH®002«j7 

IUC 

WHA f KINO 

PROG.LENGTH=OOU37 

C.C. 

UNIT t bb♦ 

PROTECT 

iuc 

COdULIE 

PROG .LENGTH® 0 b O'i 7 

iuc 

CObOLDi 

PROG.LENGTH®Obudl 

iuc 

COdOLPi 

PRUG.LENGTH=0bb27 

IUC 

COBOLUE 

PROG. L£NGTH = (J3b43 

IUC 

COdOLPi 

PR0G.LENGTHs0b7o6 

IUC 

C0B0LUP3 

PROG.LENGTH®Ob Ibb 

c.c. 

macho»comac 


MACRO HEADS 
MACHO WHITES 
MACRO KEAUd 
MACRO HtwINU 

macro unload 

MACRO dKSP 
MACRO SEFF 
MACRO SEFd 
MACRO WEOF 
maCHJU EHaSE 
macro status 
macro format 
macro TRANSMIT 
macro eoit. 

MACRO COMPARE 
MACRO MULTIPLY 

macro divide 
macro fileoesc 
macro LAdELINO 
macro variable 
macro SToPOPEN 
macro head 

MACRO WRITE 
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i-iaCku 

RESERVE. 

MACRO 

OPEN 

.'ImCHU 

CLOSE 

macro 

wHM TMNu 

maCHO 

LOrtHE J 

MACRO 

SCmk 

MACRO 

SChrnm 

>jrtCKO 

L U 4 U A T A 

MACRO 

.MRU 


END 


c • c • 

U»iiT *bb*PRu 1 tCT 

C • C • 

UNI T tbb*PR£LUAU 

c • c • 

UNI T *bb* CinREC 

c • c • 

Oil jl f *bb »UVPHU 

C • G • 

O il i »Db» 

PROTECT 

JiUC 

EaECUVR 

PRUG.LENbTH=00iU7 

lUC 

FCOVtR 

PRUG.LtNGrHsUOEOU 

iuC 

dCOINP 

PROG•LENG f H = 01 U U I 

iuC 

RCUUUT 

PHOG.LENb TH = UI3oI 

luC 

Forma i 

PROG«LENGTH s OuGo<f 

IUC 

BINARY 

PROG.LENG TH=010Ob 

iUC 

buffer 

PROG • LENGTH-OuaUi 

IL'C 

UN I I 

PROG,LENGTH=0U114 

IOC 

IUCRK 

PROG.LENG TH = 0UObu 

IUC 

EOF CHIN 

PROG.LENGTH=OOOob 

IUC 

TmPEHanU * 

PHOG.LEnGTH= 0UEla 

iuc 

pause 

PROG.LtNG m=U0U'oi 

i s^c 

Con 1kOl 

PROG.LENG TH=UUo id. 

IUC 

double 

PROG.LENGTH=01G^£ 

IOC 

ofprime 

PROG.LENGTrt=Q ido* 

IOC 

OFP 

PROG.L£NGTH=UI^o3 

IUC 

QIOmDHI 

PRUG.LENGTrt=00 Ioi 

iuC 

I fuu 

PROG.LEnGTH=uOI€>7 

luC 

I l ux 

PRUG.LENGrH=OOUib 

IUC 

xroi 

PKOG.LENGTH=0U^E7 

|UC 

Pu«RF 

PROG.LEngTh=oujo^ 

IUC 

SiNCOS 

PROG.LENGTH=OUSii 

IUC 

ATAnF 

PROG.LEngTh=uoIai 

IuC 

Eapf 

PROG.LENGTH=OU13i 

iuC 

LOGF 

PROG* L£NGTH=OOEuE 

IUC 

SIGNF 

PROG.L£NGTH=OOOib 

IuC 

SNR I F 

PROG • LENG T H=0 Uiiy 

IUC 

A»SF 

PROG.LENGTh = 0uoiu 

IuC 

EAl«tHAi 

PROG.LENG Th=uu x 

iuC 

Ea 1RtMA^ 

PROG.LENGTH=UUUoo 

IUC 

FLOaIK 

PROG.LENG-TH=OUO^T 

IUC 

fiaf 

PROG.LENGTH=OOu3U 

[uc 

HaSR InGF 

PROG.L£nGTH=uUO-+I 

luc 

FAULTS 

PROG.LEnGTH=OUU-H 

iuc 

StNSLiTt 

PROG.L£nGTH = OU iou 

luc 

SENSw TCH 

PR0G.L£NGTrt=00Uoi 

IUC 

QbUtRRuH 

PRoG.LtNGTH=0Ui <3 

iuc 

RmaR 

PROG.LENGTH = UUii«+0 

IUC 

SCar 

PROG.LENbTH=OOS*+U 

IUC 

m IvnPR 

PROb.LtNGTMsoooi'j 
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P«GE O 


IOC 

m r Kt-'n 

ioC 

Mf LOACPK 

IOC 

MTuER 

IOC 

PRCPH 

IOC 

croeh 

AOC 

CPOt-R 

IOC 

MTWPRR 

AOC 

mTrPRR 

IOC 

hTlOCPRR 

AOC 

chnktms 

AOC 

WHATIS1T 

AOC 

NRU 

IOC 

NHC 

AOC 

NWH 

IOC 

t.notroy 

AOC 

TYPEOOI. 

IOC 

whatkino 

IOC 

FUPbOXS 

AOC 

OPTBOXS 

1UC 

BCOBOXS 

c.c. 

unit *ss 

IOC 

RESTART 

IOC 

ERRSTUP 

10 c 

OPENINP f 

IOC 

OPENOTPT 

IOC 

REAO 

IOC 

WRITE 

IOC 

REAOI 

IOC 

WRITEF 

IOC 

EXAMINE 

ioc 

SUBSCRP 

IoC 

ACCEPT 

IOC 

OISPLAY 

ioc 

CONVERT 

IOC 

GPIOMAsr 

AOC 

CLOSE 

IOC 

STACKING 

ioc 

rerun 

IOC 

MBRULABS 

IOC 

LAdLARtA 

IOC 

MBWTBSTL 

AOC 

mbrobnsl 

IOC 

WRTBNSL 

AOC 

mbvarREC 

IOC 

mbhmsrch 

IOC 

MbSAPKoC 

IOC 

MBMFPRUC 

IOC 

mbmfin 

ioc 

mbmfout 

IOC 

JVCOM2 

ioc 

JVNOALI 

ioc 

MBOPTFiL 

IOC 

TRANSMIT 

IOC 

FIGCON . 

ioc 

compare 


PROG.LENGTH=U0u20 
PROG.lENGTH=OQOAU 
PHOG.L£nGTH=OOu2u 
PHOG.L tfMGTHauOU Ao 
PROG.LEnGTH= 0T)041 
PROG.L£NGTH=OOli3 
PROG.L£NGTH=OU33b 
PHOG.L£nGTH=0o2A4 
PROG,LENGTHs 00I23 
PROG.LtNGTH=002 (U 
PHOG.LENGTH=00333 
PROG .LENGTH 3 *!*) 122 
PROG.LENGTH=OOI id 
PROG.LtNGTH = 00 0’34 
PROG.L£nGTH=OOU 32- 
PRQG.LENGfH=0020 I 
PKUG.LENGTH=00u 37 
PROG.LENGTH=Oilbb 
PROG.LENGTH=0UU3b 
PROG.LENGTHS00442 
PROTECT 

PHOG.LtNGTH=u33oo 
PROG,LENGTH=00027 
PROG.LENGTHsoouub 
PROG.LENGTHsOOOoo 
PROG*LENGTHS00 U 04 
PROG.LENGTHsoOOy4 
PHOG*LENGTHsQOUv4 
PROG.LENGTH=OOG04 
PKOG*LENGTH=OUiiA 
PHOG*LENGTH=00043 
PHOG.LENGTHSOOAJl 
PROG.LENG TH=00222 
PHOG.l£nGTHsooAo3 
PROG.LENGTHsoiboi 
PH0G*LENGTH=00Aob 
PKOG*LENGTHS 00 7 02 
PROG*LENGTH = 002 ll 
PROG.LENGTH=OOib2 
PROG.LENGTHSU0U24 

pkog.length=ooo (5 
prog.l£nGTh=o 0023 

PHOG,LENGTH=0002G 
PROG.LEngTHso0034 
PROG.LENGTH® 00 03i 
PH0 G.LEnGT.H=00 032 

PHOG.LENGtH=00042 
PROG.LENGTHSOU042 
PKOG.LENGTH=OOUAb 
PROG.LENGTH=00UA2 
PROG.LENGTH=0 0 i jl 0 
PKOG.LENbTH=OUU2b 
PhQG.LENGTHS 00 A 03 
PKOG.LENGTH=OOU33 
PKOG.LENGTH=00i06 
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pAbC. f 


iuC Eul! PKUb.LEo<bTrt=UUiub 

luC euITCUoL Prt0G.ttNbTH=U0<i33 
IuC MULTIPLY PHOG«Lt^(iTrt=Uuuo^ 
1UL DiViUE PrtUb.Lt^bT^OUUo/ 
luC dMULTPLY PrtOG.L£NbTH=OUOba 
iuc buIvlUt. P«ObtLtHGIn=uoyo3 
luC QPMULOiV PrtU6.,LtN6TH=0Ub/u 
iuC b f rtiPPtrt Pr<Ob.L£Nb f H=UU<:ja 
IUC BbTrtlPPrt PKOb.Lt'iNbTh=uoii i 
iUC DEtUlT PrtUb •L£''lbTrt = OU i£u 
IUC NUfttrtlC P«UG,LtwGTrl=00U ju 
IUC ALPnAdtl PKOb,uENGrM=uUuo 1 
IUC MVEiGCUlM PrtUb.LEiNbTrt = OOU£o 
iUC VmKUI PrtUb.LtNbI m=UUU^ 4 
IuC VAHt\ PHUG,Ltf'JGTri = Ouu:u 

IuC VmHmN PKOb^LEwbrh=U0iu4 

IUC HOUuUtrt PHOG.tENGTH=OOUu6 
IuC CUiSVErtl PkOb.LtlNbfrt = 0Ui.3j 
iuc ZiPptrt PHOG # LtN6TH=UOIu3 
iuC FuPouAa PHOG.LEnG fH=oilab 
iUC UPlaUXS PHOb*LtNbrH = 00Uab 
I uC BCuaOAS phOG . LENGTH 3 (jy 442 
iuc SOKl' PPOb.LENGTH=Uu340 
Iuc SuumP PPUb,LtNGTH=uuiab 
iuC BlrmNUtC PPUb«LtiNbTn=uuo (u 
iuC SkIPkIm! PrtUb. LErtbTn = UOE4 j 
IUC tfAlfbtEP PrtuG.LLNbTri=uOuab 
iUC KM Art PrtUb • UC-iNGTH^O U O*t0 

iUC SCArt PrtUb.LErtbTH=uU340 

iuC Mlwprt PHUb.LtNGTn=OUUiU 
iuc M I'rtPrt PrtUb.LtNblH s OOO£U 

luC MlLUACPrt PrtOb«LLNbTH=UUUiu 
IUC Mlutrt PkUG.L£NGTH = UGu2u 

iUC PuCPrt PrtUb.L£NbTh s 00ui,o 

luC CHOtrt PHOG*L£NGTH=OOU4I 

iuC CPOtK PrtUG.L£Nbfrt=ouiI3 
IUC MTwPrtrt PrtUb.Lfc'NGTH^UO 33b 
IUC MfrtPrtrt PrtUb. L£nGTH= 0U*:I4 
IUC PfLUCPrtw PkOb<U£NGTH=OUl<£b 
IUC Cfi^rtT NS PrtUb.L£NGTrt=uu^/u 
IUC WHAlISIT PrtUb.L£NbTH=UUJb3 
iuC iMrtU PrtUb • LtiNGTrt^U U 

luC N«C PrtUb.LtNGTH=001 IB 

luC (Mwrt PrtUb. l£nG ] H=uOub* 

iuC T.iMUTrtUY PKOb.L£NGTH=U0Ub2 
iUC TYPtUUl. PrtUb .LtiNbTrt^uuBu 7 
luC wriAiKlNO PrtUG.LtMGTH = 0UUb7 
C*C« UNIT*bb*PrtOTtCf 
C.C. UimI V*bb»CKrt£C 
u.C. bi'<i T »obf UvpHU 
iuc HtblArtTi PrtOG.L£NGTH=UO i 3 
iuC SrttbTArtT PrtUb.LENbrH^y I u'/ 
Iuc SUrtTIUPB PrtUG.LENb fh=u43UvJ 
IUC SUUMP PrtUb• LErtbTri=U0 i3b 

iuc a'lNAtNUtC PrtUb.L£rtb fH=OOu f u 
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P Abe. 0 


IUC 

sh r^HiHr 

PHOG•LENGTH 3 002*S 

iuC 

SHTtuOAL 

PHOG .LENGTHS 024b 

IuC 

ImMl 1 bEeP 

PhUG*LENuTm=0uu3S 

C.C. 

unit *Db*Ct\HEC 

c • c • 

unit #bb» 

OVPHO 

iuC 

suKieuir 

Phug.LENGTH 3 077 Yb 

c.c. 

UN 1 r*bb•CKHEC 

C * C • 

UlMil »SD*UVPHu 

C.C. 

UNI r *OB» 

CNHtC 

c.c. 

U«M1 TfBB.UVPHU 

IUC 

son rpUi'iY 

PHOG.LENGTH 3 uuu Y6 

iuC 

SUH(PULV 

PhOG*LENGTh 3 uu2BI 

IUC 

SOH ( iUP 1 

PHOG*LENGl H 3 02out> 

iuC 

sohi prtsi 

FHOG.LENGTH 3 o2i<2 

c.c. 

UNl f t Dt> * CKHEC 

c.c. 

ON 1T f Sb t 

OVPHO 

c.c. 

UNIT*bb» 

CKhEC 

c.c. 

UNI1tdb*OVPHO 

IUC 

SkThoalF 

P«OG.LENOTH=000u7 

IUC 

ShTMBALB 

PhOG•LEN6TH=uOOu7 

IUC 

SH THPOLF 

P«OG.LEnGTh=OOOu ( 

IuC 

SkTNPOlo 

PhoG.lEnG TH=U0007 

IUC 

SP THdALri 

PHOG*LENGTh=000o3 

IUC 

Sh I ndAUJ- 

PHOG*lEngTH 3 UOuu3 

IUC 

SHThPOlF 

PhOG.lENGTH=OOOuj 

IUC 

Sh(hpolh 

PhOG.LENGTH=OOOUB 

iuC 

SuhT10P2 

PhOG *L£NGTH = 04ju u 

lot 

Sh£S f AH f 

PkO b* LENGTH 3 o11u7 

IUC 

SkTEOUal 

PKOG*LENGTH 3 0 02*tb 

IuC 

BALCFOKw 

HHOG.LENo fH=o22 i t 

ioC 

««LCoACK 

PnOb*LE nGTH 3 024 Yu 

IUC 

Pul yfoh# 

PhOg.l£nGTH=u^Iou 

IUC 

PuLYbAC* 

PkOG*LENGTH 3 023uu 

C • c * 

UNIT*SS» 

PHU TECT 

IuC 

SIPP 

PH0G.LENGTH=0oio7 

IUC 

BSIPP 

PhOG.LENGTH 3 i idol 

IuC 

SAINT 

PHOG*LENGTH 3 uAooi 

iuC 

IOPaCN 

PHOG*LENGTn 3 00 ao j 

IUC 

IOuhaIn 

PH06,L£NGTh=0002* 

IUC 

SNAPSrlUT 

PhuG*LEnGTH=OIaoo 

IuC 

CuSY 

PKOG*LENGTh=0bidI 

iuC 

COSYHUw f 

PhOG*L£NGTH 3 0Ibo Y 

H A IH 

Sb 


iuC 

pKtl-lB 

PHOGrLtNG Th = uuo23 

IUC 

H AAK 

PhOG,LEnGTh 3 00040 

iuC 

SCak 

PHOb , LENGTH 3 UUJh^u 

IuC 

MI»PH 

PHOG.LENGlH 3 000iO 

iuC 

Ml HHH 

PH0G.LENGTH 3 0002u 

IuC 

MTLUACPH 

PHOG,LENGTH 3 0 00 IO 

IuC 

NT Uek 

PHOG,lEnGTH=00 020 

iuC 

PkCPk 

PHOG*LEnGTH 3 0001d 

iuC 

CKUtK 

Ph0G*L£nGTh 3 00U4I 

IUC 

CPULH 

PHOG•L£NGTh= 00i13 

IUC 

M f WPHH 

PHuG * LEnGTH= 0u3Sb 

IuC 

MTHPHH 

PhoG*LENGTH 3 00214 
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Prtbt, V 


luC 

HiL uCPpk 

PPuG.LENG fH=UU1^3 

luc 

CPivPi Nb 

PP0b.LENbTH=uu2 10 

luc 

wHAfISii 

PPUO.LtNOTu=OU3b3 

1.0C 

:'lnU 

PKUb.LtNb rH = UO 122 

luc 

UHC 

ppog.l£p6Th=ooii2 

luC 

NwP 

PPUb • LENb T H = U U 0 04 

iuc 

1.NUTPUY 

PPUG.LENG r H*00032 

iuc 

rYPtuui* 

PrcOG.LENG 1 H=0u2o l 

luc 

A iKiNU 

PPOG.LtNGTH*0003 ( 

iuC 

PkELIG 

PpOG.L£NGTH=OOUOU 

ov 

bb»1*b 

OVtKLAY i 

iuc 

PLOVINl 

PPUG.LEnG TH*00036 

uv 

bb »2»o 

OV£rtLA Y d 

iuC 

U V 1 

PpUb.L£NGlH=u<il32 

b'cG 

bb »1 * b 

SEGmEn i l 

iuc 

PnAbE1 ' 

PHUb.L£(VG rh=U14oi 

Sto 

bb»2*b 

SEbHENl d 

IuC 

KrtAbt<i 

PP0G.L£PGTH=UUbo4 

gv 

bb * 3 * b 

Ovlklay 3 

IUC 

Ut«LuCi\ 

PPOb.LENb(N-OUlU 7 

uv 

bb»4»b 

OVtPLrtY 4 

luC 

PLOV2 

PPUG.LENG rH=04 103* 

i’lA 1 IJ 

bb 


IUC 

HOmA In 

PPUG.LENGTH*00 ibb 

ov 

bb * 1 * b 


IUC 

KbOV 1 

PPUG.LENGTH=030 lb 

St-0 

bb * I»b 


iuc 

PGF1Lt 

PPUG.LENGTH=0b0b6 

b£b 

bb*2»b 


iuc 

HbKtPUKi 

PPUG.LENG !H*0b344 

btb 

bb * 3 * b 


IUC 

PbPnO 

PpuG.LEnG lH*0bOO7 

U.v 

bb 


luC 

PbCuwP 

PhOG.LEnG rH=U32A0 

St.b 

bbfi*b 


iuC 

KuPUHL 

PhUb.LEPG rH=04 Ybi 

btb 

bb * 2 » b 


IUC 

nop r wo 

PP0G.L£NbTd=0bbo4 

btb 

bb♦3 * b 


IUC 

KbC A T 

PP0b.LENGTh=0it>( , 3 

iuc 

POP is 

PPOG.LENGTH*JO0U2 

c.c. 

UiviT • b5 9 

PPGTECT 

IUC 

KbACCtPT 

PpuG.LEnGTh* 001 7 1 

IUC 

PbU 

PPOG•LENGTH*i2Jb? 

c.c. 

U,MiTob*PPOrECT 

c • c • 

Uni f *Sb*PKELOAD 

c.c. 

UimIT *bb»CKHEC 

c.c. 

Unit *bb*OVPKU 

c.c. 

UNIT *bb* 

PKUTECT 

IUC 

FUPbOAS 

PPuG.LENGTH=ullt>b 

IUC 

OPTdOXS 

PKUG.LENGTH=00Ub5 

iuc 

dCUoUXS 

PHUG.LENGTH*00442 

IUC 

UTILITY 

PPUG.LENGTri=0b206 

luc 

C101 

PKUb.LENGTrt=OOOui 

c.c. 

UNi r*bb*PKUTtCT 


0UZ3YUUU 
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Prtot iU 


1UC 

CUPYS 

PR0t3,LENGTH=004O5 

IUC 

COPYT 

PHOC»*LEN6TH = OOb (bt 

IUC 

VERIFY 

PROG.LENGTH=01i^3 

IUC 

DUMP 

PH0G.UEnGTN=004o7 

iuc 

C0PY*/$ 

PHOG.LENGTH=01U35 

IUC 

CuPYTSU 

PROG.LENGTH=00/J4 

IUC 

ehhuh 

PHOG.LEN6TH=002/4 

c • c • 

UNIT *65 *PH01ECT 

c.c. 

FILE 
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4.1. 2 PRELIB SOURCE FOR BATCH 


PmGE 1 


C.C. SEQUENCE , U03 
C.C. JOb* * * * * 

C.C. EuUIP,55=*T,05*Sb 
C.C. EOUlP,l=MT 
C.C* PRELlb*,! 

C.C. REPLACE 
C.C. RtCOrtU* 0 
C-C* ORIGIN,0 

iuC ZERO PROG.LENGTH=OOUbu 

1UC BCIO PHOG.L£nGTH=0IS40 

IUC OKIVERO1 PROG.LENGTH=00344 
IUC DRIvERUi PROG.L£nGTH=0033U 
IUC 0HIVER02 PR0G.LENGTH s 002aS 
IUC QRIv£Hu2 PROG.LENGTh=OU23s 
IUC ORIVERU3 PROG.LENGTH=0U3bb 
IUC DHVbl<2 PHOG.L£NGTH=004yfe 
IUC DRIVER04 PRQG.L£nGTH=00222 
IUC 0RIVER04 PROG*LENGTH=003h 3 
IuC uRlv'ERub PkOG.LEnGTh= 00 1 lb 
IuC DR IV£Ki 1 PR OG•L£nGTh*0 00©0 
IUC DR1VERI2 PROG.L£HGTH=U0330 
IUC DHlv3t>yi PR0 g.LENGTH=u0o26 

C.C. REPLACEMtNi - INSERT DECK OF 6 C 1 

C.C. RECORD * START2 

C.C. OkIgIn*STAPT2 

IUC ROUMP P«0G.LENGTH=00bo4 

C.C. K£C0RD,START2 

C.C. ORiGINySTA kT2 

EXS LBUF=START2 

IUC PRELOAD PROG•LENGTH*11113 

ExS EnUPKUT=POSTLOAD 

C.C. R£CORD*START2 

C.C. 0R1GIn*START2 

IUC CkrEC PROG.L£NGTH=OOOUu 

EAb CIOPCALL=ABNORMAL 

IUC LOADER PR0G.LENGTH*U4/16 

C.C. SEPOINT jBCDGOXS 

C.C. SEPOINT,F0P60XS 

C.C. SEPOINT,ABNORMAL 

C.C. SEPOINT *ACCOUNTS 

C-C. SEPOINT,AEf 

C.C. SEPjDInT ,b£RRAOO 

C.C. SEPOInT, bKEXlT 

C.C. SEPOInT, bKRONFLG 

C.C. SEPOInT,GNJ. 

C«C. SEPOInT,6RhT 
C.C. SEPOINT,CIO 
C.C. SEPOInT,C 1C3.01 
C.C. SEPOlNTtCiP 

c.c. sepoint, cir 

C.C. SEPOlNf,C1f.RTrt 
C.C. S£POlNT*CSr 
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PMot 2 


C.C. StHOInJ i * U X N 1 • 

C.C. StPUlNr*ElHT• 

c.c. stHoiisii *tbr. 
c.c. S£PU XnT*GOFLG 
C.C. SfcPOf IM ( *LOHUtK 
C.C. StKUl»MT*LOC3 
C-C. StHOlNj *iv<t;*1UHY 
C.c. S £ P UIN F *MldHAOl) 

C.C. StPUlNT *MitJOP 

C.C. SEPOINT «fUFUrtADO 

C.C. StPOlNl tiMULXIT 

C•C• SEPUIn ffPLKKAUU 

C.C. SEPoInT *kuCKF 1 

C.C. SEPOiNI * Hn i 

C.C. S£FOiiMl,KiQ 

C.C. btHuiiMl »SI^T2 

C.C. SEPUlNl ■jUST 

C.C. KECOKu*LSlLG TH 

C.C. OHiolN,LSTLC?TH 

luc 0 V Pr\U PHUG . LE'NGTH = 02 Juo 

C.C. KECOHU * d I i'lBUF 

C*C. ORIGIN *GH>ibUF 

luc PKOIECJ VKOG.LENGrrl=0O2 fb 

iUC POS ILOaU PROG.L£NGTH=0Jui4 

c.c. hecoho * s tar F2 

C.C. OH X GIN * S T AH f 2 

IOC FlNU PhOG.LENGTH=OOOU2 

ioc PAAH PrtOG.LENGrH=OUU40 

iUC SC Ari PKOG.LENGTH=OOi4u 

Ioc 'AlwPH PH Ob •LtisiGrH = OUUlU 
ioc mihph phog,length=ooo 2 o 
ioC mTLOaCPk PrtOG.LtNGTnsouOio 
•IOC '*1T UER PHOG.|_ENGTb = 00020 
IOC PKCPH PHOG.U£NGrH=UOUAo 

IOC CKOER PHOG.LtNGTHsOOOHl 

XOC CPUtH phgg.lehgth = oou j 
IuC MlwPRR PH0 G.LEnGTH=QU 3J5 
IUC rtTRPRH PROG.LENGTH=002X<f 
IUC T LUCPHH PROG.LEnGTH=OOX23 
IUC CmnhTnS PkOG,L£NGTH=002Fu 
I uC wha«ISXT PHOG.L£NGrH=OUGJ3 
IUC iMKL) PHOG.L£nGTh = 00 122 

iUC tMKC PHOG.L£NGTH=OOX12 

IUC iMWK PHOG.L£NGTn=U00D4 

luC T.NOTRUY PkOG.LENGTH=OOuJ 2 
IOC TYPtOUr. PHOG.L£iMGTH=U02u 1 
IuC WhAlKlNU PrOG.L£nGTH=OOUG7 
IUC PROGNaRE PH0G.LEnGTH=U0Uu4 
C«C. REcOHU*START 2 
C.C. OKiGift*ST akT2*3207 
IUC COmPaSS PhOG.L£iNGTH= 1UXC7 
C.C. HECOKUfSfAH 12 
C.C. ORIGIN*START2 * 10107 
IuC OVERLAY! PrtOG.LENGTh=lJi<+b 
C*C* HEC0H0*STARr2 
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C.C. UK ibl N » b f AH 1*2 9 10 1 0 7 

1 UC PAbbONC. PKUu*LtNoTH=io2bi 

C.C. KtCUHU♦b IAK12 

C.C. UkIGAN*SIahT2*10107 

iUC PAbbfWU HK0(i.Ut' v 'GTH=i64ob 

iuC SY^TriLc. PKOU.LtLNUTri-OiiUu i 

C.C. KLCOKO*Sl AK 12 

C«C. UK 1 GlftsbFAH f2? i010 7 

iUC CkT PKOG.LtNGTM=l<;uut 

C.C. KtCUHUfblAK12 

C.C. 0KiGlN*bfAKT<n32U/ 

iUC FTnI PkOU.Llnu fh*i7U (3 

C.C. KLCOKU*biAKT2 

C.C. UKlviift » b TaK T2* i j.234 

luC F I Nt PK0G.LtftGfH=looo3 

C*C. Kt-COKU f b I AK XeL 

C.C. UKiGift*bVAHT2t43bb 

iUC f I isb PKUu,L£NGTH=12obb 

C»C. KcCOKU*SiAKT2 

C.C. ukigIn* bf akT 2«43bb 

IUC F.IN4 PK0G.LtlNGTH=it>OAi 

C«C* nPCUKu.bl AKT2 ■ 

C.C. UKiUiiN*biAHr2f4437 

li'C Fifth FKOG•LfcNGTh®A3403 

C.C. kCCOHU* bTAKI 2 

C.C. UK AG lft * bl AKT2 » 4437 

iUC FTNO PKOG.LtNGTr(*l i fQv 

C*C. Kt-CvjKU » b I Art T 2 

C.C. UK1Gift9 b lAK 12 » 434 7 

J.UC F i .\L FftUG.L6.ftGTn=lb2£2 

C*C. t 1 LL 

C.C. KFPlaCc. 

C.C. UftiIfbb.KUUMK 

C.C. Ufti 1 »bb»PKtLuAO 

C.C. uni T»bb*Ci\KtC 

C.C. urUT*bb*OVPKU 

C.C. u.n1 r*bb*PKO JtCT 

iUC CuiiPAbbd FK0G.L£ftGTH=0UUb2 

Ltu bbUi 

C.C. u.Mi T *bb*PKUTtCT 
C.C. unaT 9bbtFlNO 
C.C. Ui v «iT*bb*CUMPMSS 
C.C. UNif#bb*Ov£KLAYi 
C.C. UNIT »bb*PASSuN£ 

C*C. UNiT*bb*PASSI«0 

C.C. UNA f »bb*CKl 

IuC FukIHAn PKOG.Lfc>GTri=UOAo2 

LC.U bbU 1 y boO 1 

C.C. UNiT*bb» pko rtCT 

C«C. UNir»bb»FTNU 

C.C. UNiT»bb*FTNi 

C.C. UHiT*bb*F TN2 

C.C. UNIT *bb*F In3 

C «C . UNi T » bb *FTN4 

C.C. UNITtbb*F fNb 


60237000 



4 


HAuE 


C • C • UoiXT tbb i FT 1 N 6 
C• C • UN1 T »3b iF 1Ht 


lu C 

CObUL 

PKOG,LtiNGTh=uUuj 

Ltu 

b4ul *3bJl 

1UC 

RAAR 

PROG .LEi*GTH=UU 0*0 

IUC 

SCak 

PK0G*lEnG TH=0ud*u 

loC 

MT.nPK 

PROG# LENGTH*000 i o 

1UC 

mTkPK 

PKOG*LLNGTh=UUu<;o 

luC 

M I LUACHk 

PROG«LENGTh*UOUiu 

luC 

M l UC.R 

PkOG.l£nGTH=GOu£v 

IUC 

pkCpr 

PROG•LENG Th s 0UUio 

luc 

CRUER 

PKOG#Lt^G I ri-OOO^i 

IUC 

CHUCK 

PRU6.LENGTH=U0 JU J 

JLUC 

H i wRHK 

PHOG*LENGTn=OOdJb 

iuC 

mTkHkk 

PKQG»UtiNGTH = u'0iii4 

IUC 

MTLUCPRR 

prog.lEngih=ooiej 

IUC 

CMNkTNS 

PROG*LENGTH=OuE ( 0 

IUC 

wMA \IS If 

PKUG.LUNGfrt=oOJJi 

IUC 

NKU 

PrUG* LLNGTH*0U id'd 

luC 

NKC 

PKOG.LEimGTk=OOI id 

IUC 

NWr 

Pk0G*lEngTh=u0uo4 

luC 

T • IM(J f RU Y 

, PkUu• LEnGT n = 0 0 Ode; 

IUC 

TYPtOU f • 

*PKUG.UtMGrH=00du7 

IUC 

RriA IMNU 

PROu*LENGTH = OOUbY 

C.C. 

U,>uT*!>b 

♦PROTECT 

IUC 

CUbULlt 

PKOG.LtNGTH=OoUi / 

luC 

COriULUi 

PKOG.LENGTH=Gbooi 

luC 

COdULPi 

PKOG*LENGTH=Obbt / 

luC 

COBULUi 

PROG.L£NGTH=Odb43 

IUC 

CUbULPE 

PROG.L£rGTH=U3 1 do 

IUC 

CUdOLUPj 

PKOG• LENG rrl=0biDd 


C* mauKU*COmaC 

MACRO 

hEaos 

mhCKU 

wri itS 

MaCRO 

RtAOB 

i'laCRO 

RE*Inu 

maCRU 

UNLOAD 

haCRo 

d*SP 

macro 

SEFF 

maCRO 

SEFb 

.MACRO 

WEOF 

macro 

EH«St 

MACRO 

STATUS 

macro 

porma r 

macro 

TRanSmIT 

macro 

toil* 

MACRO 

COMPAHt 

macro 

MULTIPLY 

macro 

DIVIDE 

MACRO 

FIlEOcSC 

macro 

LAdELIiMG 

MmCRO 

VARIAdLL 

macro 

s TopupEn 

maCRO 

RtAD 

macro 

WRI ft 
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P Ag£ S 


!*i aOHO 

HtStK^L 

> IaCKO 

UPC-G 

'•IaCKO 

CLObc 

> IhCHvJ 

wrlrt i‘K I i'4U 

MACHO 

LOWKLJ 

•M A C K G 

SCaH 

•ImCHU 

SCahnh 

r< a C h u 

LO*UA rA 

ha CKO 

NKU 


LOU 

C«C. UNi T *sb *PHOitCT 
C«C. Ohj.T*S 3*PH£LOAO 
C * C * U;Mi T os f CriHtC 
C • C • UGlIoStUVPKO 


C * C » 

UNlil 

PHOLLCl 

i U C 

EACCOVK 

phug 

LEhg fH=UU L 07 

1UC 

FLuVtrt 

PHOG 

UtivlGT fi=UUL JO 

iuc 

BCuiftP 

phog 

CLHoTri^oiOui 

iuc 

tjCOOUT 

PHOG 

L£HG!h=0l3Gi 

iuC 

pUKMA1 

PHUG 

LtHGTH = UU J3M- 

iuC 

BliMAHf 

PHOG 

LLNGTrt s OiUub 

iUC 

GuFFEK 

PHOG 

LchGTH^U^-U 

luC 

UHL 1 

PHUG 

L£NGTh=UuU4 

luC 

I UCiiK 

PHOG 

LLHGTH—liUUGij 

LOU 

EuFCHK 

PHOG 

LtHG rri=OOOGs 

iuc 

T HpLrlAGU 

PHOG 

LLNGTrt=UuEiD 

iuC 

PmUSE 

PHOG 

LLHGTrt=000bi 

i^C 

CO.\i 1 HOL 

PHOG 

LtHGrh=00o/2 

LUC 

ouuoct 

PHUG 

L£lNGTH=ui042 

i uC 

UFPKiHc 

PHOG 

LLHGTn s U1204 

iuC 

OrP 

PHOG 

LL:NGTh=Ul2o j 

L UC 

QiGMOKi 

PHOG 

LtrtGTh=dUioi 

i uC 

i ruu 

PkOG 

LtNGTH=U0iu7 

tUC 

L rox 

PKOG 

LtNGTn=Ov>uiG 

iuC 

x ioi 

PHOG 

L£NGTH=0U22 f 

i uC 

POrtHF 

PHUG 

LtHGrrt = 0uib2 

auc 

SiGCoS 

PKOG 

LLHGTh=OUGi j 

IUC 

A f AGF 

PKOG 

LLHGTr»=0U I4i 

IUC 

txPF 

PKOG 

LLNGTH=OOiGi 

JLUC 

LOGf 

PHOG 

LLhg Vri=uu^y2 

i uC 

S i CNF 

PHOG 

L£wGTri a uuu is 

iuC 

SgHTf 

PKOG 

LLHGTrf=UOi iu 

iuC 

AbSF 

PHOG 

LtiMGTrt-OOoiu 

iuC 

E a THEiMmI 

PKOG 

LLNGTrt=OUiu2 

iuC 

LXiK£rtrt2 

PKOG 

LLHG rrisuOuoo 

i uC 

FlOATF 

PHOG 

l£hgTh-uoc/2 / 

iuC 

Fixr 

PHOG 

LtNGTri=U0OGO 

iuc 

HMSXIGOF 

PHOG 

L£NGTr» s 00O4l 

iuc 

FmOL1S 

PHOG 

LCNGTrt=UUUG4 

iuc 

SC-GSL i it 

PHOG 

L£hg Th=0uiou 

luC 

SLGSw TCrt 

PHOG 

l£hG rri=uUuoi 

iuC 

GOOtHKOK 

PHOG 

LtiNG 1 H = UU i f3 

IOC 

HA AH 

PHOG 

L£GGTH=UUU‘+U 

iUvJ 

SCaH 

PHuG 

L£HGTri = UUG*i-y 

LuC 

M 1 *PH 

PHOG 

LfcNGTri 3 JOUio 
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PhUc. o 


iUC '4<KPN PKOG.LtNG TH=UUUEu 

JlUC MTLUACPK PHUO*LENGrH = UUU j. 0 
iuC MluEH PHOG*LENGTh s OOuEu 

iUC PHCPH PHOG.L£nGTH=OUU1o 

IUC CHDtK Hr<OG#L£HGTH=UOO‘*l 
iuC CHUUK Hk0O*«LEnGTH s 0u i i j 

IUC .4l WHHrt PHOG.LE*GTrt=0US33 
IUC M T KHKH PKuG*LEHGTH = UU^i4 

iuc mTlucphk phog.length=uuie3 

IuC CMNHT^S PKOG*LErtGTrt=OOE /0 
IUC WrlAUSi'f PHOG.LE»NGTr|=OOJ33 
IuC NKu PKUG^LEMGri-FOOlEE 

IUC NHC PKUG,LEiNGTM=OOiiE 

IuC NWH HKOG^LENGTh^OOU^A 

luc T.NOrrtuir PHOG*L£rtGTrt=uOu JE 
IUC TYPtOUV. PHUG.LtNGTrt=UU<;o / 
IuC wriAl *INU PHOG.LENGTH=00037 
IUC FuPoOaS PHOG^EnGTH^uI i->d 
IUC OHTetOAS PHOG*L£NGrH=OOooS 
IUC 6C0G0XS PHOG.L£hGTH= 00442 
C.C. u.\ii T*Bb*PROTECT 
IUC KtbiAHl PKOG*L£KGTh=033uu 
IUC EKHSfUP PH(JG*L£iMGTrl s 00u£7 
IuC OPEWINPT PHuG*LtNGTM = OUO'Jt) 
IUC OPE^U fP I PHUG#L£HGTH = 00Ut»6 
IUC HEAD PH0G.L£^GTH=UUUU^ 

iUC WKllE PKOG«LENGTrt = OOUJ4 

IUC KEauI PKUG.LtNG frt = U0u>J4, 

IUC rtKljtF PHOG*LENGTrt = GOuu4 
iUC EammInE HHOG.LE‘'iGTH = 0ul 11 
IuC SUoSCKP PHQG.LtNGTnsOUo** j 
IUC ACCEPT PHOG*LtNGTri=Oui ji 
iUC DISPLAY PkOG,LEHGTh=OOEE 2 
iUC CUimvEKI PkuG#L£nGTh=OU ibj 
IUC GPIuHAaT PHUG*L£iMGTii = Uibol 
iuC CLOSE PK0O#LENGTr1 s 001o6 

IUC STACKING PHUG«lENGTH = 00 (\j<L 
IuC kEHUH PKOG*L£fXGTrt=UOE /1 

IUC MriHuLAdS PKQG •LE | '*GTH = 0 u I o2 
IUC LhBLAHEm PHOG.LEnGTHsOUu^^ 
IUC MdWldSlL PH0G,LE^GTH=J0UYS 
iuC MdHudi'lSL PHOG«L£NGTn=UOo<i3 
iUC WrtTdNSL PHOG*L£HGTn = OGu£j 
lUC MbOMrirtcC PHOG*l£nGTH = 0uuJ 4 
IUC MdHHSHCH PHUG.LEnGVH= 000Ji 
IUC MbSMPrtOC PHOd«LEKGfH = OUU32 
IUC- «4ui4FPntOC PHOG.LE*GTrt=QOU42 
IuC MdHFlW PHOG • LE^GT r 1 = U 0 U4<£ 
IUC MdMKOUT PKOG.L£*GTH=OOyiu 
IuC JYC0.4E PHuG,L£^GrH=UuoiE 
IUC JVNOALI PKOG«LENGTH 3 00110 
IUC MBOPTFlL PHUG.L£^GTH=UOUEd 
IUC ThaimSmiT PHUG.LENGTH=U01uJ 
IuC FIGCOU PHOG#lc.^G rH=00i>Jj 
IUC Cur4PAKL PHOG.L£NGTH=001 Jo 
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p*Gt f 


1UC tUll PHUG* L£NG TH 3 0 u 1 \J0 

IUC EOllCOoL PHQG«L£NGTH 3 OuE.i.j 
IUC MJLlIPLY PK0G*LENGrH 3 0uuo2 
IuC UlVXiJC. PHOG*L£NGTh 3 OUoo/ 
I'UC BrtULTPLY PrtOG.L£NGTH 3 UOUbS 
IUC 6UXYIJE PHOG.LENGfri s OUUbj 
IUC UPMULUlV HKUG«L£NG‘rH=0UO/0 
IuC STHlPPtrt PBGG«L£NGTH=Op<:bb 
IUC dSTKIPPH PNUG*L£NGTH 3 Ou-li i 
IUC OEEulT PHOG*L£NuTri 3 uuiEO 
IUC NUHEKiC PRUG*LENGTH 3 OUOju 
lUC ALPHAbtf Prt<JG.L£^Gfrt=OUUJi 
IUC ^VFiGCON PHOG*LENGTHsOOu^d 
juc VhKC i PKUG*L£NGTH 3 0oOb4 

IUC VAHN PROG.LENGTH s Oupbl 

IUC VmHaN PKOG*lEnGTH 3 OUIu4 
IUC RuJnUEH PKUG.LENGTH 3 0U0Uo 
IuC CONVERT PHOG*l£nGTh=uu1jJ 
IUC ZIPPEH PHOG,LtNGTh=OUi 
iUC FOPbOXS PKOG.l£hGTH=u 1IJb 
IUC OPTdUXS PHUG,L£NGTH=OUUJb 
IUC BCUbOXS PPUGsL£ , ^GTH = UU 4 ; *^ 
IUC Sum PROG*LENGTH 3 00340 

IUC SUUHP PHOG*LtNGTH=0U13b 

IUC BiNANUtC PH0 G*LEnG Th = 000 (o 
IUC SKTPrtlNT pKOG.LENGTH 3 0U^4b 
IuC WAIT BEtP PHOG.L£NGTH=OUObb 
IuC HAAK pKOG # LENGTrt=OOU^u 

IuC SCaH PHUG#L£NGTH=0Ui40 

IUC MfwPH PHUG#L£NGIH=0U0i0 

IUC MTkPR PKOG« LENGTH 3 OOUiiU 

lUC mTlumCPh PKUG*L£nGTH = 0OOio 
iUC HTuEH PHOG,L£NGTH=OuuZO 
iUC PRCPH PPOG.LENGTHsOUOlb 

IUC CHUtK PHUG.LENGTHSOOO^i 

IUC CPUEH PHOG.L£NGTH=001IB 
IUC MfwPHR PHOG*L£NGTH 3 uObb-5 
IuC MfHPKrt PHUG • LENGTH 3 0 0<li 4 
iUC mTluCPKH PHOG#LENGTH 3 OUi<iJ 
IUC CmnHTNS PkOG*L£NGTH 3 OOZ i o 
IUC WNAlISit PHOG*LENGTH 3 OOibb 
IuC NRu PHOG«l£NGTH 3 001E^ 

IuC NKC PHOG«LENGTH = OOi id 

IUC NWK PR0G«L£NGTH=00034 

IUC T.NOTrtuY PHOG.LENGTH=OOUb^ 
IUC TYPEOUT. PROG*LENGTH 3 OuEu ( 
IUC WHAf'KlNU PHOG # lEhuTH=OUOJ7 
C • C • Uni.T *bb»PROTECT 
C.C. UNiTfbb«CKH£C 
C.C. Un(lT*bb*OVPHO 
IUC RESfARli PROG.LtNGTH 3 O0IE3 
IUC SRESTART PROG.LENGTH 3 OiIJ f 
IUC SOrtllUPZ PHOG.LEhGTH = 04Juo 
iUC SUUHp PHUG*LEnGTH= 00ibb 

IUC BINANOEC PhQG.lENGTr 3 OOV 
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Pm^C O 


UC SkIPKIsmI PKOG.Lc«>ibTH = UU2 , + 3 
UC SKTLJUaL PK0b,LLNbTr1=U02i':D 
UC WAiTdttP PKUG.Lt»MbTH = U0UOb 
C.C. uNi I f db»Cr\H£C' 

C«C.« UNi r fdSUVPKu 
luC SUKItOil PKOb.LtNbTri=U f i to 
C.C. UiMi TfSbfCKKtC 
C.C. Ui\li X 9 dbf UVpKU 
C.C* uNi f tobfCKHtfcC 
C*C* Ur<u T *bS»UVPHU 
UC SOKIPOHY PKOG.LLNbTH s uOU Yb 
UC SUdIPUuY PKUG.LtNoTH=u02bi 
UC SOKflOPI PKUO.L£nGTH=U2oJo 
UC SdKlPHdi PKUbri.tNGTH=u2i id 
C.C. uNi T *obtCftKtC 
C.^. uni f *i>df ovPKo 
C.C. JwiTtbbfCKKtC 
C.C. Ui'U V f 33 f 0 N/PKU 
UC SKfHbrtuF PKub. LtNG Trl = u0U 0 Y 
UC SKlHriAuo PKOb.LtNb f H = u00u Y 
UC SkTmPulF PHOd#Lc.t'ioT h s Uuuu Y 
UC Sk I ilPULo PKOb.LcNu |H = 00uu ( 
iuC SKTKdALd PPOG.L£r<l(3TH=OUOuo 
UC SrtlwtiALF PK0 G*L£NGTH=uuUw3 
UC Sh i HPULI- PKOb.LtNbTHsuuuu 3 
UC SKfKPOUd PkUG.l£NGTH=00OU3 
UC SOKUUP2 PKOG.L£NGTH=043ju 
UC SKtbiAKf PKOb.LtNGTn-Oii.JY 
UC SkT£GUaL PKQG.LtNGT H = Q0<Ub 
UC BmLCFOhW PKUb.LtNbTrt=u22 1 1 
UC,, dALCdACft PHG6 .L£nGTH=U 24YU 
iUC POLYFOKw PKUb.LtNbTrt=u2iO0 
UC PULYdACK PKOb.L£NbTH = 02Juu 
C.C. UNiffJOfpKOTtCr 
UC Sipp PK0 G.l£nGTh=Q6U7 

UC SmUT PKOb.LtNbTH = U4bo3 

UC I0PACK PkOG.L£NGTH=uU4o 3 
lJC I UL)K A i iM PKUb.L£NbTh=0UU2**. 
UC SNAPSHOT PHOG.L£NGTH = ui<ou 
iOC CuSY PKOG.L£NGTH«0diJi 

UC CUSYKOWT PKOG.L£nG TH = 0iSo 7 

MM i (>( 3b 

UC pKLLld PKOG.L£lMGTH=0Ub23 
UC KAAK PKOG.L£NbTH = OUU‘«.0 

x uc SCAK PKOG.LtN6TH=UU J^u 

UC MT *Pk PHOG.L£NgTH=OUU1U 

UC MidPH Pk0G.L£nGTH=0UU2U 

UC HlLUACPK Pk0G.L£nGTH=UUU1u 
UC MiDtK PK0G.L£NGTH=UUU2 u 

UC PkCPK PHOG.LtNbTrt = OUOib 

UC CHUtn PkOG.L£NGTH = OOua i 

UC CPOtK PkOG.L£nGTH=Ou ii3 

i.UC MfwPKK PHOG.L£NGTH=003Jb 
UC tftKPHK PKOG.L£NGTH s 002i4 
UC mTLUCPKK PKUG.L£NGTH=U0i23 
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1UC 

CMnHT’NS 

PPOG.LEnGTH=00E 70 

AUC 

whaIisi f 

PROG.LENGTH-00333 

IUC 

ilPU 

PpOG*L£nGTh = 00 idd 

iuC 

NPC 

PPOG*L£nGTH= 00i i<£ 

IUC 

N*K 

PPOG*LENGTH=UOUb4 

IuC 

1*NU TPUY 

PPoe*LeNeTM s uuobc' 

iu C 

TYPEOUI* 

PKOG.LENGTH=QO<io? 

iUC 

YriA ! KiNU 

ppog*length* ooOb? 

IuC 

PPELId 

PPOG.LEnGIH=U0000 

ov 

ss * 1*s 

ovEklay i 

IUC 

PLOW INf 

PKOG*LENGTH=OOb3b 

UV 

Sb*^*S 

OVEPLAi d 

IUC 

ovi 

PPOG*LENGTH=U2ibe 

St.G 

33*1*3 

SEGnEHi i 

IuC 

PuaSEI 

PHOG*LEnGTH= 01Aoi 

see 

bb * 3 * S 

SEGmEni d 

IUC 

PH#\St^ 

PK0G.LENGTH=Q0bO4 

UV 

bb*3 * S 

OVeHLAY s 

IuC 

OEbLOCa 

PpOG • LtNG l'H=0 01 u 7 

0 V 

Sb*4 * S 

OVEKLAY 4 

luc 

PLU 

PPOG.LENGTh=04i03 

WAIh 

bb 


iuC 

PGMA IN 

PK0G*LEnG TH = 00ibb 

UV 

bb*I*S 


IUC 

Peuv l 

PPQG*LEngTH= 030lb 

see 

bb*1 * S 


IuC 

pgfile 

PPUG*LENGTH=050bb 

Seo 

Sb*£*3 


iuc 

PePEPOKT 

PK0G*L£NGTH=Ubb44 

see 

bb * 3 * S 


IUC 

PGPKO 

PPOG.L£NGTH=ObUU 7 

uv 

Sb*2*S 


iuc 

pgcomp 

PP0G*LENGTH=u3<i4u 

Sbu 

bb*i*S 


iuc 

Report 

PHOG.LENGTH=04 7bi 

see 

bb * d * S 


iuc 

Pep T*o 

PPOG*L£NGTH=ObSc>4 

Stu 

bb*3*S 


IUC 

pec«r 

pKOG.LENGTH=Oio/3 

IUC 

pep i s 

PP0G*L£nGT H=OUOO£ 

C • c • 

UNl r*bb*PPOTECT 

iuc 

PbACCePl 

PPOG.LENGrH=OUi71 

iuc 

Peu 

PPOG.L£NGTH=I*!UbY 

c • c • 

u ii r*bb*pKoiECr 

c • c • 

UNir*bb*PKELOAD 

c • c • 

uni r *bb*CKPEC 

c.c. 

UinjI T *bb»UVPHO 

c.c* 

UNIT »Ob* 

PPOTECT 

IUC 

FUPbOAS 

PKOG,lEngTm= 01ibb 

iuc 

op r ouxs 

PPOO.LeNG TH=0UUbb 

iuc 

BCuaOAS 

ppug.lengthsuoaa.^ 

IUC. 

0 1 IL1 T Y 

PPOG«LENGTrt=Ob«!Ub 

iuc 

CiUi 

PPOG*LENGTH=OOUu1 

c • c • 

UNIT* bb *PP01tCT 

IUC 

CUPYS 

PPOG* LENGTH = 004co 
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PmGE i\J 


iJC 

copy r 

PrtOo*LLN<iTri s uGo f b 


vcHifr 

PHOvi* LtNoTrt = U i idj 

iuC 

DUMP 

PHOti.LEN(jTH=U0437 

luC 

CUPY*b 

PHO(3,LtiVt5TH=OiUJD 

luC 

copy rsw 

PHOG.LL.\(jTh=OU Yb-f 

i^C 

trtHUri 

PHOb.L£N«jrH=0u«: /4 

c • c • 
c • c • 

tuf 

Ui 4 XT fb3»pr<0 ftCT 

K ILL 
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4.1.3 PRELIB SOURCE FOR BDP 


PhGE JL 


C.C. SEuU£nCE* 004 
C.C. JOb* *» * 

C.C. £UUIP*5b=MT>b=5d 
C.C. EUUIP* iOsfiT 
C.C. PRELld**10 
C.C. FILE 

C.C. REPLACE * COBOL *COBOL 

1UC COBOL PK0G.L£NGTH=Ui2yi 

Ltu bAUlobOI 

C.C. REPLACE*COriOLl£»COBOLOPJ 
IUC COBOlIE PROG.LENG TH=0b0iO 
luC CQdULUi PROG.L£NGTH=UoU 3J 
iUC COBOlPi PH0G.LENGTH=0bbOD 
IuC C0BUL02 PRUG.L£NGTH=U3b*+3 
IDC COBULP2 PROG.L£NGTH=UbI 
iUC CudULOPJ PH0G.L£NGTH=0bi3o 
C.C. REPLACE * RESTaRT *OPTBUXS 
luC PESfAHT PROG.L£NGTH=033 oo 
IUC ERRSTOP PHOO.LENGTH=Quo2 f 
IuC 'OPENlMPf PROG.L£NGTH s 00OOb 
IUC OP£Nt)TPT PKOG.LEWGTH=OOOUo 
IUC REAU PROG.LENG TH = U0uu<* 

IUC WRITE PROG.L£nGTH 5 O0UO4 

iuC REAUl PRuG*L£RGTri = uOUu^ 

IUC WRITEF PKUG,LENGTH=000U4 
IUC EXAMINE PROG.LENGTri=OOiii 
IUC SUBSCRIP PROG.LENGTrt=UUiub 
IUC 0P6INBCU PROG.LENGTH=OOAOb 
IUC DPBCDBIN PHOG.LENGTH=UOi2u 
IUC ACCEPT PROG.LEnGTH=UOI 26 
IUC GPIUMAST PRUG.LENGTHsOI (Of 
IUC CLOSE PROG.LENGTH=OUiTo 

IuC STACKING PROG,L£iNGTH=00 Tu 3 
IUC RERUN PROG*LENGTH-00<£ (1 
IUC MbRULAbS PROG.LENGTM=UOi32 
IUC LAbLAREA PROG.L£NGTh=UUo2^ 
IUC MbwibSTL PROG.L£NGTM=Ouy (3 
IUC MBRUdNSL PROG.LENGTH 5 Q0023 
IUC WRTdNSL PROG.lKnGTh= 0012I 
IUC MdVARREC PROG.L£NGTH=OOoo 2 
IUC MbRMSRCH PROG.LENGTH=U0024 
IUC MdSAPRUC PROG,LENGTH 5 OOU32 
IUC MdMFPROC PROG.LENGTHSOUO^E 
IuC MdMFlN PROG.l£NGTH=OUU^ 2 
IUC MdMFOUT PROG.l£NGTH=uOO 16 
IUC JVCOM2 PROG.LENGTH=OOUI2 
iuC JVNOALT PROG.L£NGTH=00110 
IUC MdOPTFlL PROG.LENGTH=0002b 
IUC F1GC0N PROG.L£NGTrt=000‘+4 
IUC COMPARE PROG.L£NGTH 5 00100 
IUC MULTIPLY PHOG.LENGTHsooi'+b 
IUC OIOIUE PROG.L£NGTri=0Ulil 


TT— A _ Ol 


XI-I ttX 
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PmCE d 


iuc 

S irtlPPtK 

PP0b,LE*N(5Trt=UU Ju4 

luC 

OtEOlT 

PP0^.L£n<?TH = 00i20 

I DC 

l\JUHt.PlC 

PHO<5.L£pv5TH=U0UJu 

iuc 

AcPHMdt r 

PpO<j*LtPii Thsooo ji 

10 c 

DISPLAY 

PKUb.LE>MtiTH=0G<^2 

iuc 

« v i vF 1 (iCUfM 

ppoo.LtP’3 rn=uuucD 

luC 

\/a.hh; i 

PHOO*LtHo rrt-OOuoif 

iuc 

VhK" 

PHDb.LE'HDTH=OUu Ji 

luC 

VmHAN 

PHO(j#LEPvi rrt=U0i<ii 

l uC 

ZlPPEP 

PWOo,LEP6Th=0U i J4 

c * c • 

heplace* soh r * sop r 

iUC 

Sup 1 

PPO(3*LtPl5TH s Ouoi o 

c • c • 
c • c • 

tor 

otLert, 

FiLt 

Ou1dUAS*UP IdOAS 
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4.2 BINARY RELEASE TAPE FILE 1 


INTERIM LIBRARY PRE LIB SOURCE 


C • C . f l'J j LlrlK«HT 

C*C. E-^UiH f bjsHT» jd=33 

'c. 4U 1't 3 9 'J i = IT 

C • C • t J KfcL i a ** i ** 

C »C• rilt 

C*C» *Hc.Otf<2 

'«t I ob 

ItfO ^<LLld 
o » oo*l 

i JC MuUV Ini i 
■j* oo*<? 

i i-'C Utf l 
.^o :)b * i 

ii'C PiAbtl 

-V-O -io»^ 

u v ob ♦ b 

I'-’C Oc.*-lLOC.\ 

'J* 53H 

A 'C J uJvP 

C•O• fiLt 

dor 


r J KOG* LENGTH 3 0 J 

PL'J V i * i 

HRUb*Lfc.HO»Tn=UU‘+o ( 
PKvJij«Lt.''H3T > H= v >d i j?_ 

Pr<OG*Lt.NorH = Ul 1 ++o 
rMOb • LE^G T ri - 0 0 b o ^ 
HHJi5»LLi'iorn s UUio i 
PPUG • LENGTH— id Jt!b 


■ -iAl M 
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4.3 RTS COSY TAPE CONTENTS 


The composite COSY tapes of this release contain all necessary routines used in generating either 
an RTS/STD or an RTS/BATCH library. The following list gives the sequence of the routines found 
on the RTS COSY tapes. 

The deck name of each routine in the following list is suffixed with a special code. The definitions 
of this code are: 

S Specified routine used for RTS/STD libraries 
B Specified routine used for RTS/BATCH libraries 

0 Specified routine used for both RTS/STD and RTS/BATCH with assembly option. 

A Specified routine used for all libraries 
X BDP users 
Y BCD users 

Z Specified routine has a special assembly option 


COSY TAPE NUMBER 1 


DECK NAME 

CODE 

DECK NAME 

CODE 

DECK NAME 

CODE 

DECK NAME 

CODE 

ZERO 

A 

POSTLOAD 

AZ 

BINARY 

A 

EXTREMA1 

A 

CIO 

SZ 

PRELIB 

A 

BUFFER 

A 

EXTREMA2 

A 

BCIO 

BZ 

PLOVINT 

A 

UNIT 

A 

FLOATF 

A 

DRIVLABT 

A 

OV1 

A 

IOCHK 

A 

FIXF 

A 

DRIV3649 

A 

PHASE 1 

A 

EOFCHK 

A 

MASKINGF 

A 

DRIV3248 

A 

PHASE 2 

A 

TAPEHAND 

A 

FAULTS 

A 

DRIV3659 

A 

DEBLOC K[ 

A 

PAUSE 

A 

SENS LITE 

A 

DRV512 

A 

PLOV2 

A 

CONTROL 

A 

SENSWTCH 

A 

DRIV3644 

A 

EXECOVR 

A 

DOUBLE 

A 

Q8Q ERROR 

A 

DRIVTYWR 

A 

FTO 

A 

DF PRIME 

A 

SCOPUTIL 

A 

DRIV3245 

A 

PROGNAME 

A 

DFP 

A 

COPYS 

A 

DRIVER12 

A 

FT1 

A 

Q1QADRI 

A 

COPYT 

A 

OCRMACRO t 

A 

FT2 

A 

ITOJ 

A 

VERIFY 

A 

DRIV3293 

A 

FT3 

A 

ITOX 

A 

DUMP 

A 

DRIV3691 

A 

FT4 

A 

XTOI 

A 

COPYWS 

A 

SCICREC1 

SZ 

FT5 

A 

POWRF 

A 

COPYTSQ 

A 

BCICREC1 

BZ 

FT6 

A 

SINCOS 

A 

ERROR 

A 

RDUMP 

AZ 

FTE 

A 

ATANF 

A 

IOPACK 

A 

PRELOAD 

OZ 

FTN 

A 

EXPF 

A 

IODRAIN 

A 

CKREC1 

A 

FLOVER 

A 

LOGF 

A 

SNAPSHOT 

A 

LOADER 

AZ 

BCDINP 

A 

SIGNF 

A 

FDPBOXS 

A 

OVPRO 

AZ 

BCDOUT 

A 

SQRTF 

A 

OPTBOXS 

A 

PROTECT 

A 

FORMAT 

A 

ABSF 

A 

BCDBOXS 

A 


t Exists as a MACRO only 
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COSY TAPE NUMBER 1 (continued) 


DECK NAME 

CODE 

DECK NAME 

CODE 

DECK NAME 

CODE 

DECK NAME 

CODE 

BSIPP 

S 

SAINT 

AZ 

COBOL 

Y 

MBRMSRCH 

Y 

SIPP 

A 

SORT 

AZ 

COBOLIE 

Y 

MBSAPROC 

Y 

RAAR 

AZ 

BINANDEC 

A 

COBOLD1 

Y 

MBMFPROC 

Y 

SCAR 

AZ 

SDUMP 

A 

COBOLP1 

Y 

MBMFIN 

Y 

MTWPR 

A 

SRTPRINT 

A 

COBOLD2 

Y 

MBMFOUT 

Y 

MTRPR 

A 

SORTPOLY 

A 

COBOLP2 

Y 

JVCOM2 

Y 

MTLDACPR 

A 

SRTMBALF 

A 

COBOLDP3 

Y 

JVNOALT 

Y 

MTDER 

A 

SRTMBALB 

A 

ERRSTOP 

Y 

MBOPTFIL 

Y 

PRC PR 

A 

SRTMPOLF 

A 

OPENINPT 

Y 

TRANSMIT 

Y 

CRDER 

A 

SRTMPOLB 

A 

OPENOTPT 

Y 

FIGCON 

Y 

CPDER 

A 

SORTPDMY 

A 

READ 

Y 

COMPARE 

Y 

MTWPRR 

AZ 

SORTEDIT 

A 

WRITE 

Y 

EDIT 

Y 

MTRPRR 

AZ 

SORTIOP1 

A 

RE ADI 

Y 

EDITCOBL 

Y 

MTLDCPRR 

AZ 

SORTPHS1 

A 

WRITE F 

Y 

MULTIPLY 

Y 

CMNRTNS 

A 

SRTRBALF 

A 

EXAMINE 

Y 

DIVIDE 

Y 

WHATISIT 

AZ 

SRTRPOLF 

A 

SUBSCRP 

Y 

BMULTPLY 

Y 

XTTTtT^ 

IN SXU 

AZ 

Op'-P'D'P ATP 

A 

n 

A prr TY r P 

JT JL 

\r 

X 

BDIVIDE 

V 

NRC 

AZ 

SRTRPOLB 

A 

DISPLAY 

Y 

DPMULDIV 

Y 

NWR 

A 

SRESTART 

A 

CONVERT 

Y 

STRIPPER 

Y 

T. NOTRDY 

A 

RESTART1 

A 

GPIOMAST 

Y 

BSTRIPPR 

Y 

TYPE OUT. 

A 

RSTRTDUM 

A 

CLOSE 

Y 

DEEDIT 

Y 

WHATKIND 

A 

SORTIOP2 

A 

STACKING 

Y 

NUMERIC 

Y 

COMPASSB 

A 

SRTEQUAL 

A 

RERUN 

Y 

ALPHABET 

Y 

COMPASS 

A 

POLYFORW 

A 

MBRDLABS 

Y 

MVFIGCON 

Y 

OVERLAY1 

A 

BALCFORW 

A 

LABLAREA 

Y 

VARC1 

Y 

PASSONE 

A 

BALCBACK 

A 

MBWTBSTL 

Y 

VARN 

Y 

PASSTWO 

A 

POLYBACK 

A 

MBRDBNSL 

Y 

VARAN 

Y 

SYMTBLE 

A 

WAITBEEP 

A 

WRTBNSL 

Y 

ROUNDER 

Y 

CRT 

A 

RESTART 

Y 

MBVARREC 

Y 

ZIPPER 

Y 





COSY TAPE NUMBER 2 




DECK NAME 

CODE 

DECK NAME 

CODE 

DECK NAME 

CODE 

DECK NAME 

CODE 

COM ACf 

A 

POPENOTP 

X 

PC LOSE 

X 

PMBMFPRO 

X 

PRESTART 

X 

PREAD 

X 

PSTACKIN 

X 

PMBMFIN 

X 

PCOBOL 

X 

PWRITE 

X 

PRERUN 

X 

PMBMFOUT 

X 

PCOBOLIE 

X 

PREADI 

X 

PMBRDLAB 

X 

PJVCOM2 

X 

PCOBOLD1 

X 

PWRITE F 

X 

PLABLARE 

X 

P JVNOALT 

X 

PCOBOLP1 

X 

PEXAMINE 

X 

PMBWTBST 

X 

PMBOPTFI 

X 

PCOBOLD2 

X 

PSUBSCRI 

X 

PMBRDBNS 

X 

PFIGCON 

X 

PCOBOLP2 

X 

PBPBINBC 

X 

PWRTBNSL 

X 

PCOMPARE 

X 

PCOBOLDP 

X 

PDPBDCBI 

X 

PMBVARRE 

X 

PMULTIPL 

X 

PERRSTOP 

X 

PACCEPT 

X 

PMBRMSRC 

X 

PDIVIDE 

X 

POPENINP 

X 

PGPIOMAS 

X 

PMBSAPRO 

X 

PSTRIPPE 

X 


t Exists as a MACRO only 
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COSY TAPE NUMBER 2 (continued) 


DECK NAME 

CODE 

DECK NAME 

CODE 

DECK NAME 

CODE 

DECK NAME 

CODE 

PDEEDIT 

X 

PVARN 

X 

RGOV1 

Y 

RGPTWO 

Y 

PNUMERIC 

X 

PVARAN 

X 

RGFILE 

Y 

RGCRT 

Y 

PALPHABE 

X 

PZIPPER 

Y 

RGREPORT 

Y 

RGRTS 

Y 

PDISPLAY 

X 

COSYRDWT 

A 

RGPRO 

Y 

RGACCEPT 

Y 

PMVFIGCO 

X 

COSY2. 0 

A 

RGCOMP 

Y 

RGU 

Y 

PVARC1 

X 

RGMAIN 

Y 

RGPONE 

Y 




4.4 ASSEMBLY REFERENCE GUIDE 

4.4.1 REFERENCE GUIDE FOR ASSEMBLING INSTALLATION DEPENDENT ROUTINES 
CIO 


COSY NO. 

1 

10 

20 

40 

3 

TIMEOUT 

EQU 

0 


BCIO 





COSY NO. 

1 

10 

20 

40 

3 

TIMEOUT 

EQU 

0 


SCICREC1 





COSY NO. 

1 

10 

20 

40 

4 

ACCT 

EQU 

0 


5 

BDP 

EQU 

0 


6 

CLOCK 

EQU 

0 


7 

NCHANS 

EQU 

6 


8 

MAXCORE 

EQU 

77737 8 


2033,2061 

AET 

OCT 



2126,2132 

RHT 

modifications 



2140j 2143 

BRUT 

modifications 



2210 


00 

IOIP 

0 

2211 


00 

IOIP 

1 

2212 


00 

IOIP 

2 

2213 


00 

IOIP 

3 

2214 


00 

ABINRT 

4 

2215 


00 

ABINRT 

5 

2216 


00 

ABINRT 

6 

2217 


00 

ABINRT 

7 

2253 

SYST. IOM 

OCT 

178 
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BCICREC1 


COSY NO. 

1 

10 

20 

40 

4 

ACCT 

EQU 

0 


5 

BDP 

EQU 

0 


6 

CLOCK 

EQU 

0 


7 

NCHANS 

EQU 

4 


8 

MAXCORE 

EQU 

37637s 


703 

IOT 

00 

IOIP 

0 

704 


00 

IOIP 

1 

705 


00 

IOIP 

2 

706 


00 

IOIP 

3 

707 


00 

ABINRT 

4 

708 


00 

ABINRT 

5 

709 


00 

ABINRT 

6 

710 


00 

ABINRT 

7 

1306,1326 

AET 

OCT 



1391,1397 

RHT 

modifications 



1438 

. SYST.IOM 

OCT 

178 


RDUMP 





COSY NO. 

1 

10 

20 

40 

21 

SER.OPT 

EQU 

0 


PRELOAD 





COSY NO. 

1 

10 

20 

40 

8 

BF 

EQU 

0 


131 

ACCT 

EQU 

0 


130 

TRAIN 

EQU 

0 


181 

TRN5951 

EQU 



182 

TRN5952 

EQU 



183 

TRN5953 

EQU 



LOADER 





COSY NO. 

1 

10 

20 

40 

10 

LERP 

EQU 

0 


POSTLOAD 





COSY NO. 

1 

10 

20 

40 

23 

LERP 

EQU 

0 
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OVPRO 


COSY NO. 1 


10 


20 


40 


12 


LERP 


EQU 


4.4.2 COSY CORRECTION SAMPLES 

The coding and control cards necessary to punch binary decks for insertion into the PRELIB source 
are demonstrated by the following example. It does not represent a complete update. This example 
assumes the following system. 

1. Floating-point hardware 

2. No BDP hardware 

3. User desires a STD RTS library 

4. User desires clock interrupt processor 

5. User desires basic accounting 

6 . User desires lost interrupt option 

7. A 32K 3300 with the following configuration: 


Equipment 

Type 

Quantity 

Controller 

Channel 

Equipment 

Unit 

Console typewriter 

1 

none 

none 

none 

none 

607 magnetic tape drives 

4 

3423 

2,3 

4 

0-3 

415 card punch 

1 

3446 

1 

4 

0 

501 printer 

1 

3659 

0,1 

5 

0 

405 card reader 

1 


1 

3 

0 


9 SEQUENCE, 002, MODIFY SCICREC1 
9 JOB, 12345, ABC 


9 EQUIP, 01= 

=MT, 02=MT 


LUN 01 = The RTS COSY tape 

9 COSY 



LUN 02 = The Hollerith output tape 


DELETE/ 

4 


ACCT 

EQU 

1 

Basic accounting desired 


DELETE/ 

5 


BDP 

EQU 

0 

BDP hardware not available 


II—4—2 8 
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DELETE/ 

6 


CLOCK 

EQU 

1 

Clock interrupt processor desired 


DELETE/ 

7 


NCHANS 

EQU 

4 

Define the CST 


DELETE/ 

8 


MAXCORE 

EQU 

77737 g 

Set the amount of available memory 


DELETE/ 

2033,2061 


AET 

OCT 

41004000 

Unit 1 library 


EXT 

DRIVE R01 

Ch-2/3, Eq-4, Un-0 


VFD 

09/000, A15/DRIVER01 



OCT 

45000000 

Unit 2 CTO/CFO 


EXT 

DRIVER05 

Console typewriter 


VFD 

09/000, A15/DRTVER05 



OCT 

42003000 

Unit 3 standard INP 


EXT 

DRIVER02 

Ch-1, Eq-3,Un-0 


VFD 

09/100, A15/DRIVER02 



OCT 

43005000 

Unit 4 standard OUT 


EXT 

DRIVER03 

Ch-0/l, Eq-5, Un-0 


VFD 

09/300, A15/DRIVER03 



OCT 

44004000 

Unit 5 standard PUN 


EXT 

DRIVE R04 

Ch-1, Eq-4, Un-0 


VFD 

09/100, A15/DRIVER04 



OCT 

01004001 

Magnetic tape 


VFD 

09/060, A15/DRIVER01 

Ch-2/3, Eq-4, Un-1 


OCT 

01004002 

Magnetic tape 


VFD 

09/060, A15/DRIVER01 

Ch-2/3, Eq-4,Un-2 


OCT 

01004003 

Magnetic tape 


VFD 

09/060, A15/DRIVER01 

Ch-2/3, Eq-4, Un-3 


/»AftOn AAA 

0U£0 i UUU 
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DELETE/ 

2126,2132 

RHT 

OCT 

0 , 0 , 0 , 0 


OCT 

0 , 0 , 0,0 


OCT 

0 , 0 , 0 , 0 


OCT 

0,0,0202,03040502 


DELETE/ 

2140,2143 

BRHT 

OCT 

0 , 0 , 0 , 0 


OCT 

0 , 0 , 0 , 0 


OCT 

0 , 0 , 0 , 0 


OCT 

0 , 0 , 0202,0 


Set up RHT to match AET 


Set up BRHT to match AET 


CIT modification 
IOIP channel available 
ABINRT channel not available 


SYST. IOM 

SCICREC1 


DELETE/ 

2210,2217 


00 

IOIP 

Channel 0, available 

00 

IOIP 

Channel 1, available 

00 

IOIP 

Channel 2, available 

00 

IOIP 

Channel 3, available 

00 

ABINRT 

Channel 4, not available 

00 

ABINRT 

Channel 5, not available 

00 

ABINRT 

Channel 6 , not available 

00 

ABINRT 

Channel 7, not available 

DELETE/ 

2253 


OCT 

17 

Set up system I/O mask to match 
available channels 

DECK/ 

1=01, H=02 



ENDCOSY/ 


9 COMPASS, 1=02, L, R, P 
ggend-of-file 
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This example assumes the following: 

1. A BATCH RTS user 

2. User does not desire clock interrupt processor 

3. User does not desire basic accounting 

4. User does not desire lost interrupt option 

5. No BDP hardware 

6 . A 16K 3100 with the following configuration: 


Equipment 

Type 

Quantity 

Controller 

Channel 

Equipment 

Unit 

Console typewriter 

1 

none 

none 

none 

none 

601 magnetic tapes 

4 

3127 

0 

0 

0-3 

405 card reader 

1 

3248 

1 

3 

0 

501 printer 

1 

3152 

i 

K 

KJ 

n 

415 card punch 

1 

3446 

1 

4 

0 


^SEQUENCE, 002, MODIFY BCICREC1 
9 JOB, 12345, ABC 
gEQUIP, 01=MT, 02=MT 
gCOSY 


DELETE/ 4 
ACCT EQU 0 

DELETE/ 5 
BDP EQU 0 

DELETE/ 6 
CLOCK EQU 0 

DELETE/ 7 
NCHANS EQU 2 

DELETE/ 8 

MAXCORE EQU 37637g 


Do not include basic accounting option 


BDP hardware not available 


Do not include the clock option 


Define the CST and EST length 


Set the amount of available memory 
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IOT 


AET 


DELETE/ 

703,710 


00 

IOIP 

Channel 0, available 

00 

IOIP 

Channel 1, available 

00 

ABINRT 

Channel 2, not available 

00 

ABINRT 

Channel 3, not available 

00 

ABINRT 

Channel 4, not available 

00 

ABINRT 

Channel 5, not available 

00 

ABINRT 

Channel 6, not available 

00 

ABINRT 

Channel 7, not available 

Define the AET 

DELETE/ 

1306,1326 


OCT 

41000000 

Unit 1 library 

EXT 

DRIVE R01 

Ch-0, Eq-0, Un-0 

VFD 

09/200, A15/DRIVE R01 


OCT 

45000000 

Unit 2 CTO/CFO 

EXT 

DRIVE R0 5 

Console typewriter 

VFD 

09/000, A15/DRIVER05 


OCT 

42003000 

Unit 3 standard INP 

EXT 

DRIVER02 

Chl,Eq3,UnO 

VFD 

09/100, A15/DRIVER02 


OCT 

43005000 

Unit 4 standard OUT 

EXT 

DRTVER03 

Chl,Eq5,UnO 

VFD 

09/100, A15/DRIVER03 


OCT 

44004000 

Unit 5 standard PUN 

EXT 

DRIVE R04 


VFD 

09/100, A15/DRIVER04 


OCT 

01000003 

Magnetic tape 

VFD 

09/060, A15/DRIVER01 


OCT 

01000002 

Magnetic tape 

VFD 

09/200, A15/DRIVER01 


OCT 

01000001 

Magnetic tape 

VFD 

09/200, A15/DRIVER01 
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DELETE/ 

1391,1397 

RHT 

OCT 

0 , 0,0, 0 


OCT 

0 , 0,0, 0 


OCT 

0 ,0,0, 0 


OCT 

0,0,0202, 03040501 


DELETE/ 

1438 

SYST.IOM 

OCT 

3 

BCICREC1 

DECK/ 

1=01, H=02 


ENDCOSY/ 



gCOMPASS, 1=02, L, R, P 
ggend-of-file 


Set up RHT to match AET 


Set up system I/O mask to match 
available channels 


4.5 ONE CARD LOADER 


In order to run the one-card loader program as listed in paragraph 4.5.1, the appropriate 
SEQUENCE, JOB, and COMPASS control cards must be inserted before the deck and the 
appropriate LOAD, RUN, and end-of-flle cards must be placed after the deck. 

To terminate punching the one-card loader cards when executing the program, set SELECT 
JUMP 1 on. 
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4.5.1 


ONE-CARD LOADER LISTING 


L0A0512 

EXT CIO 

ENTRY L0AC512 


00000 

G1077377 

01 

0 

77777 

0 

L0AD512 

UJ D 

* * 

0C001 

00777777 

00 

1 

X77777 

3 


RTJ 

CIO 

GC902 

02000076 

02 

c 

00 076 

0 


G 2 

6 2 

00003 

01000001 

01 

0 

P00391 

0 


IJP 

*-2 

00004 

41000013 

41 

0 

PG0C13 

0 


41 

APS 

00005 

00000050 

00 

0 

00050 

0 



ABSE-ABS 

00006 

C0700001 

0 0 

1 

X00001 

3 


TJ 

CIO 

00007 

13 0 0 G 076 

1? 

0 

00076 

0 


13 

62 

00010 

032C0006 

03 

0 

P00 006 

2 


AZJ,GF 

*-2 

00011 

C0100000 

00 

0 

P00000 

1 


Ss.1 

L0AC512 

00012 

ClQl‘0001 

01 

0 

PG0001 

0 


UJ P 

L 0AD512 + 1 

00013 

14050000 

14 

0 

50000 

0 

ABS 

NOP 

509009 

ooni4 

14100000 

14 

0 

00000 

1 


EM 

0,1 

00015 

20100007 

20 

0 

00007 

1 


LCA 

7,1 

0 0016 

40120000 

40 

0 

20000 

1 


STA 

XCT, 1 

00017 

10100340 

10 

0 

00 04 C 

1 


ISI 

XGTNO ,1 

00C20 

01000002 

01 

0 

3 0 0 0 2 

0 


UP 

2 

00021 

01020000 

01 

0 

20000 

0 


IJP 

XQT 

Q 0 0 2 2 

77032000 

77 

0 

32000 

0 


CON 

EUUU, C 

0 0 Q 23 

01C230C0 

Cl 

0 

20000 

0 


IJP 

XQT 

0 C 0 24 

74C20120 

74 

0 

20120 

0 


INPW 

C,3FFP,BPFRE 

0 C 025 

3CG20053 

30 

0 

20050 

0 




QC026 

01020003 

01 

0 

20 0 0 G 

0 


IJP 

XQT 

00027 

77230002 

77 

0 

30002 

2 


FXS 

2, C 

00030 

01020005 

01 

0 

20005 

0 


UP 

X CT5 

00031 

14600000 

14 

1 

00000 

2 


ENA 

G 

00 032 

21020053 

21 

0 

20050 

0 


L CO 

RFF° 

0 C 03 3 

13000006 

13 

0 

0Q0G6 

0 


SHAG 

6 

0 0034 

15477776 

15 

1 

77776 

0 


INA,S 

-1 

00035 

53500000 

53 

1 

000 00 

1 


TAI 

1 

ooo^e 

15477737 

15 

1 

77737 

0 


IM,S 

-=>IF 

00H37 

03220036 

C 3 

0 

20036 

2 


AZJ, C-E 

XGT30 

0 0 C 4 0 

noooorn 

13 

0 

00 0 C 2 

0 


SHAG 

7 

00041 

12420003 

12 

1 

90003 

0 


SEC 

3 

0001*2 

13020314 

13 

0 

*90 014 

0 


Sf-AQ 

1? 

00043 

44020034 

44 

0 

20034 

0 


SNA 

XQT28 

0 C C 1 * 1 * 

24020351 

24 

fj 

20051 

0 


LCA 

PFFP1 

000t*5 

3 0 0 2 0-350 

30 

0 

20050 

G 


ACA 

BFF° 

00046 

14200345 

14 

0 

00045 

2 


ENI 

37,2 

G0047 

3022005? 

30 

0 

20052 

2 


ACA 

PFPP2,2 

00050 

02620025 

C? 

1 

20025 

2 


IJH 

XCT21 , 2 

GC051 

030200?'’ 

03 

0 

20033 

0 


AZJ,EC 

XGT27 

G0Q52 

77230010 

77 

0 

30010 

2 


CXS 

ioe,c 

00053 

00700003 

00 

1 

COOOO 

3 


c T J 

Q 

00054 

77770000 

77 

1 

70000 

3 


LCS 


00055 

20120060 

2 G 

0 

20060 

1 


LOA 

PPGRH,1 

0 0 0 5 6 

40100300 

40 

0 

3 0 0 0 0 

1 


STA 

0,1 

00C57 

C2520"33 

? 2 

1 

20923 

1 


I JO 

XQT27,1 

'0 0 G 6 0 

77230040 

77 

0 

30 049 

2 


EXS 

40-3,0 

00061 

C1020031 

01 

0 

20 031 

0 


u n 

XGT25 

00C62 

C 1 C 2 0 3 C 2 

Cl 

0 

20 002 

0 


u° 

XQT2 




0 0 003 


C 

EQ'J 

3 
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L0AD512 


02000 

EUUU 

EQU 

2 0 0 0 B 

20000 

XQT 

ECU 

2 0 0 0 0 B 

2000? 

XQT2 

ECU 

XOT+2 

20005 

X QT 5 

ECU 

XQT + 5 

20025 

XCT21 

ECU 

XCT+21 

20031 

XQT25 

ECU 

X CT + 25 

20032 

XQT27 

ECU 

XGT+27 

20034 

XQT29 

ECU 

XCT+20 

2C036 

XGT3C 

ECU 

XQT+30 

00040 

XQTNO 

ECU 

32 

20050 

BFFR 

ECU 

XCT+40 

20051 

BFFP1 

ECU 

BFFD+1 

20052 

BFFR2 

ECU 

BFF° +2 

20060 

P°GPM 

E CU 

BFFR+8 

20120 

BFFR E 

EQU 

BFFR+40 

00040 

RIF 

ECU 

4 OB 

0 C 06 3 

ABSE 

ECU 

* 



END 

L0A0512 
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4.6 FCO LEVEL 


RTS Version 2. 0 is assumed to run on a configuration at the following field change order 
levels: 


3100 Equipment 


Product Designation 

3114 

Main frame 

C03 

3119 

Memory 

B01 

3207 

Channel 

A04 

3106 

Channel 

B06 

3248 

Card reader controller 

A12 

3256 

Printer controller 

B02 

3228 

Tape controller 

A08 

3446 

Card punch controller 

A08 

3447 

Card reader controller 

B03 


3200 Equipment 


Product Designation 

3204 

Main frame 

A01 

3209 

Memory 

A08 

3206 

Channel 

A07 

3207 

Channel 

A01 

3228 

Tape controller 

A08 

3248 

Card reader controller 

A12 

3245 

Card punch controller 

A05 

3659 

Printer controller 

All 


3300 Equipment 


Product Designation 

3304 

Main frame 

A22 

3302 

Memory 

A14 

3310 

Floating point 

A09 

3312 

BDP Unit 

A15 

3306/06 

Channel 

A08 

3307/06 

Channel 

A12 

3649 

Card reader controller 

A23 

3644 

Card punch controller 

A14 

3659 

Printer controller 

A13 

3421 

Tape controller 

A08 


II-4-3 6 


60237000 




4.7 VERIFICATION DECK OUTPUT 


The following paragraphs contain verification program outputs for the RTS product set members. 
BSIPP, SIPP, and error recovery routines do not have verification programs. 


4.7.1 ADAPT 


PARTNO TEST TLRGT.TLLFT AND TLON 

SS THIS PROGRAM SHOUL d HANG UP ON CARO 1*0 WITH ERROR NO, 

LOOPST 

CLPRNT 


L1»LINE/0»0»5*0 
L2*LINE/9»0t9 f 5 
L3»LINE/0*8»5 i8 
L4«LINE/0»0»0i5 

strat«point/-i»-i»o 

PP«PLANE/0t0»l»-.5 

PSIS/PP 

CUTTER/.5 
MACHIN/ BENDIX, 1 
FROM/STRAT 
GO/Ll 

TLRGTtGORGT/Ll 

G0LFT/L2.L3 


SS X-AXIS 

SS LINE AT X»9 
SS LINE AT X«8 
SS Y-AXIS 


pai mm Ji 
UUkr|/ 

30LFT/L4.L1 

TLLPT»G0LPT/L1»PAST»L2 
G0LFT/L2 

GOLFT/L3.PAST.LA 

loopnd 

LOOPST 

G0LFT/L4 

TLRGTtGOLFT/Ll 

TLLFT»GOLFT/L2 

TtRGTtGOl.FT/1.3 

TLON.GOLFT/U.PASTtLl 

golpt/li 

G0LFT/L2.PAST.L3 

GOLFT/L3. 

G0LFT/L4.L1 

GOTO/STRAT 

LOOPND 

END 

FINI 


503 


000 


001 

003 

00 * 

005 

006 

00 ? 


008 

002 

OlA 

010 

020 

030 

040 

050 

060 

O7O 

080 


090 

100 

110 

120 

130 

140 

150 

160 

170 

200 


FINI 
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TEST TLRQT.TLLET AND 

TlON 



CARD NO. 

000 

TAPE 

NO. 

2 

CUTTER/ ,5000 0 




card NO. 

008 

TAPE 

NO. 

5 

MACHIN/BENDIX 1 




CARD NO. 

002 

TAPE 

NO. 

7 

X 

-1.0000000 


Y 

-1.0000000 

z 

0 

CARD NO. 

OlA 

TAPE 

NO. 

* 

X 

-1,0000000 


Y 

.0.2500000 

z 

-0.5000000 

CARD NO. 

010 

TAPE 

NO. 

11 

X 

9,2500000 


Y 

-0,2500000 

z 

-0.5000000 

CARD NO. 

020 

tape 

NO. 

13 

X 

9.2500000 


Y 

7.7500000 

z 

-0,5000000 

CARO NO. 

030 

TAPE 

NO. 

15 

X 

-0.2S00000 


Y 

7.7500000 

z 

-0,5000000 

CARO NO. 

0*0 

TAPE 

NO. 

17 

X 

•0,2500000 


Y 

.2500000 

z 

-0,5000000 

CARD NO. 

050 

TAPE 

NO* 

19 

X 

9.2500000 


Y 

.2500000 

z 

-0,5000000 

CARD NO. 

060 

tape 

NO. 

21 

X 

9.2500000 


Y 

7.7500000 

z 

•0,5000000 

CARD NO. 

070 

TAPE 

NO. 

23 

X 

-0.2S00000 


Y 

7.7500000 

z 

-0.5000000 

CARD NO. 

080 

TAPE 

NO. 

25 

X 

-0.2S00000 


Y 

-0.2500000 

z 

•0,5000000 

CARD NO. 

090 

TAPE 

NO. 

27 

X 

8.7500000 


Y 

-0.2500000 

z 

•0.5000000 

CARD NO. 

100 

TAPE 

NO. 

29 

X 

8,7500000 


Y 

8.2500000 

z 

•0,5000000 

CARD NO. 

no 

TAPE 

NO. 

31 

X 

0 


Y 

8,2500000 

z 

-0.5000000 

CARO NO. 

120 

TAPE 

NO. 

33 

X 

0 


Y 

-0.2500000 

Z 

-0.5000000 

CARD NO. 

130 

TAPE 

NO. 

35 


ON CARO NUMBER 

1*0, CAUL CARD 

NUMBERO0000000 





riNi 

CHECK CLTAPE PRINTOUT FOR PROGRAM 

error comments 


CARD NO. 

1*0 

TAPE 

NO. 

38 
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PARTNO ARLMG TEST 7/30/66 0. B. HORNING 001 

LOOPST SS FOR BLOCKING 

CLPRNT 002 

CUTTER/1 005 

C1«C1RCLE/0 ( 0,10 010 

Ll*LINE/0»-8,l»-8 020 

L2aLINE/0«0»l*0 030 

FROM/-10.5*0*0 040 

INOIRV/1*0*0 050 

TLON.GOFWO/lR•ON » C1 060 

G0FW0/L2*PAST.C1 070 

GOFWO/L2*TO'C1 000 

G0FWD/L2.0N.CI 090 

GOFWD/L2.PAST#Cl loo 

FROM/-7»-7.50tO 

INDIRV/1(0*0 120 

TLLPT .GOFWD/L1*TOtCl 130 

gofwo/l1*on»c! Uo 

GOFWO/Ll.PASTtCl l50 

LOOPND SSFOR SLOCKING 

F 1 N I 160 



ARLMG TEST 7/30/66 

0, B, HORNING 



CARD NO, 

001 

TAPE 

NO. 

2 

CUTTER/ 

1,0000 0 




CARD NO, 

005 

TAPE 

NO, 

4 


X 

-10,5000000 

y 

0 

z 

0 

CARD NO. 

040 

TAPE 

NO. 

6 


X 

•10,0094500 

y 

0 

z 

0 

CARD NO. 

060 

TAPE 

NO. 

9 


X 

-9,4999500 

Y 

0 

z 

0 

CARD NO, 

070 

TAPE 

NO. 

11 


X 

9,4999500 

Y 

0 

z 

0 

CARD NO, 

080 

TAPE 

NO. 

13 


X 

9,9099500 

y 

0 

z 

0 

CARD NO. 

090 

TAPE 

NO. 

15 


X 

10.5004500 

y 

0 

z 

0 

CARD NO. 

100 

TAPE 

NO. 

17 


X 

•7.0000000 

Y 

-7,5000000 

z 

0 

CARD NO. 


TAPE 

NO. 

19 


X 

5.8308726 

Y 

-7,5000000 

z 

0 

CARD NO. 

130 

TAPE 

NO. 

22 


X 

6.6143171 

y 

-7,5000000 

z 

0 

CARD NO. 

140 

TAPE 

NO, 

24 


X 

7.3491123 

y 

-7.5000000 

z 

0 

CARD NO. 

150 

TAPE 

NO. 

26 

FINI 





CARD NO. 

160 

TAPE 

NO, 

28 
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4. 7. 2 COBOL (BCD AND BDP) 


4.7.3 COMPASS 


4.7.4 COSY 


4.7.5 FORTRAN 


COBOL HAS BEEN INSTALLED ON THIS LIBRARY 


COMPASS HAS BEEN INSTALLED ON THIS LIBRARY, 


CHKCOSY DECK/ C*06 

endcosy/ 


FORTRAN HAS BEEN INSTALLED ON THIS LIBRARY, 
I FTNO 00*0 STOP 
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4.7.6 PERT COST 


MAST F- j Tapf LlSTI^r, - TT ST T^sT fFS* 3200 HEPf/CoiT) 

PP3SB'»*J nT:sI«M4TT' > M - CTfc 


Flue SNT - S'JMMAPy ndmbc’h FiLF 


SUMMARY PFSr'. 


NS. 

1000 

I.K V 

1 

PA*FNT 

(1 


nFSCRIT'TlCN 

1000 

o 

HIERARCHY 

0 0 

TABLE 

0 

0 

0 

0 

lion 

? 

1 000 



1000 

1100 

n 

0 

0 

0 

0 

0 

1200 

o 

1000 

'? 


1000 

1200 

0 

0 

0 

0 

0 

0 

1300 


1000 



1000 

1300 

0 

0 

0 

0 

0 

0 

1110 

3 

1100 



iooo 

1100 

1110 

0 

0 

0 

0 

0 

1120 

3 

1 1 00 



1000 

1100 

1120 

0 

0 

0 

0 

0 

1210 

3 

1200 

J 


iooo 

1200 

1210 

0 

0 

0 

0 

0 

1220 

* 

1200 

‘J 


1000 

1200 

1220 

0 

0 

0 

0 

0 

1310 

3 

130C 



1000 

1300 

1310 

0 

0 

0 

0 

0 

1320 

3 

1 300 



1O00 

1300 

1320 

0 

0 

0 

0 

0 

1330 

3 

1300 



inoo 

1300 

1330 

0 

0 

0 

0 

0 

1221 

4 

1220 



1000 

1200 

1220 

1221 

0 

0 

0 

0 

1222 

4 

1220 

’■} 


inoo 

1200 

1220 

1222 

0 

0 

0 

0 

1321 

4 

1320 



IOOO 

1300 

1320 

1321 

0 

0 

0 

0 

1322 

4 

1.320 

} 


1000 

1300 

1320 

1322 

0 

0 

0 

0 

1323 

4 

1320 

0 


1000 

1300 

1320 

1323 

0 

0 

0 

0 
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FtU T - Cria^<,f 

: * 

HKfc 


CHAKSr ^C. L PAPt N'T Pc 

.CP 

r-, # 

DESCRIPTION 

too'-or-o 4 

PI 764 

1 1 1 


A 

17 660216 

200PCG0 ** 

11 l r '64 

11 10 


A 

1 7 6S0112 

Vfl' C'.'O 4 
91764 

111”' 

•J 

o 

29 641203 

1100'0^0 4 

303SS 

1 1 20 

•j 

A 

17 650726 

12 >O-'OC>0 4 
S]46S 

112 ‘ 

0 

n 

71 650804 

21 i'O- o.>o 4 
1036S 

l?T 

j 

A 

620610 

2? >0' (V’O 4 
S(l36S 

1210 


n 

<0 650618 

23OOP000 4 

9?S69 

121'- 

j 

0 

17 620913 

31 «)0 n 0v0 *> 

111044 

1 221 


A 

192 641211 

41 6 

ir^s 

1222 


ft 

! 7 42032b 

4? >o OCG *5 
?1S6S 

1 22? 

o 

* 

n 620502 

si or, ooo 4 

PI 744 

1 ■» 1 :• 


A 

37 620112 

S?‘>0 CIO 4 

110?64 

1 HO 

o 

o 

37 641223 

S3<K>ooi;o 4 
li-?664 

1210 

) 

A 

37 b41110 

S40Ci.OOO 4 

112044 

1 ’1 o 

• l 

n 

77 641222 

hl'iO-'OoO 5 

211 AS 

1221 

0 

0 

17 620308 

M >0 000 5 

121064 

1 222 

... 

0 

TO 650429 

7200-000 5 

121«64 

1222 


$ 

70 650429 

A100; OHO S 

111104 

1 *2.3 

u 

A 

37 620120 

82000000 8 

1 223 


A 


11 S6S 


0 


17 650308 

9100 >000 4 
3176S 

12 30 

0 

A 

17 651005 


HIERARCHY TA8|_E 



10*0 1100 

inn 


0 


0 

0 

0 

0 

3 

650216 650226 

i 

15 


15 

650216 

650226 

640923 



1000 1100 

mo 


0 


0 

0 

0 

0 

3 

65.1112 620122 

2 

10 


lo 

650112 

650122 

641123 



1000 1100 

mo 


0 


0 

0 

0 

0 

3 

641111 441223 

i 

10 


5 

641203 

650122 

640917 



1000 1100 

1120 


0 


0 

0 

0 

0 

3 

650726 650602 

20 

27 


27 

650726 

650805 

650329 



1000 1100 

1120 


0 


0 

0 

0 

0 

3 

650804 n20924 

25 

30 


30 

650804 

650924 

650619 



1000 1200 

1210 


0 


0 

0 

0 

0 

3 

650610 620605 

20 

27 


27 

650610 

650805 

650308 



1000 1200 

1210 


0 


0 

0 

0 

0 

3 

650527 650715 

23 

28 


26 

650618 

650820 

650415 



1000 1200 

1210 


n 


0 

0 

0 

0 

3 

650913 650924 

26 

30 


30 

650913 

650924 

650505 



1000 1200 

1220 

1221 


0 

0 

0 

0 

3 

641211 650428 

2 

9 


9 

641211 

650428 

641128 



1000 1200 

1220 

1222 


0 

0 

0 

0 

3 

650326 450520 

14 

24 


24 

650326 

650520 

650112 



10.>0 1200 

1220 

1222 


0 

0 

0 

0 

3 

650505 650629 

1 1 

25 


25 

650505 

650629 

650229 



1060 1300 

1310 


0 


0 

0 

0 

0 

3 

641026 441119 

1 

14 


4 

650115 

650310 

640917 



1000 1300 

1310 


0 


0 

0 

0 

0 

3 

641223 450121 

4 

11 


u 

641223 

650121 

641018 



1000 1300 

1310 


0 


0 

0 

0 

0 

3 

641110 641208 

4 

7 


7 

641110 

641208 

641008 



1000 1300 

1310 


0 


0 

0 

0 

0 

3 

641222 650217 

8 

12 


1? 

641222 

650217 

641117 



1000 1300 

1320 

1321 


0 

0 

0 

0 

3 

650308 650318 

15 

19 


19 

650308 

650318 

650218 



1000 1300 

1320 

1322 


0 

0 

0 

0 

3 

650429 650617 

13 

22 


22 

650429 

650617 

641211 



1000 1300 

1320 

1322 


0 

0 

0 

0 

3 

650429 650617 

18 

23 


23 

650429 

650617 

641217 



1000 1300 

1320 

1323 


0 

0 

0 

0 

3 

650120 650215 

6 

16 


16 

650120 

650215 

641111 



1000 1300 

1320 

1323 


0 

0 

0 

0 


3 

650308 

650318 

16 

20 

20 

650308 

650318 

650120 


1000 1300 

1330 


0 

0 

0 

0 0 

3 

651005 

651015 

20 

31 

31 

651005 

651015 

650308 


II-4-42 


60237000 



FlLfc Th^EF - COST FTLF 


PtRF. 

CRO. 

WrS. 

conF 

CHARGE NO. OATt BUDGETS 

ESTlMATtS 

HOURS 

actuals 

DIRECT 

total 

COMMITTED costs 

1 

C0R2 

U'OUOCO 00 0 

r i ooo 

0 

0 

0 

0 0 



u 

340U 

0 

0 

0 



0 315u 0 0 0 

0 2ISO ooo 

U SSO 000 

0 2300 000 

O iso 0 0 0 

It u o c 0 

0 o o 0 0 

<> O 0 o 0 

<j 0 o 0 0 

O 0 0 0 0 

1 c 04 noOCf'O 0 0 o U 2340'-- 0 0 0 0 0 0 

U 3550 0 o 0 

o 2350 0 0 0 

0 3600 000 

0 7250 0 0 0 

O 4200 ooo 

O 600 OOO 

0 U 0 0 0 

U O o o 0 

it 0 0 0 0 

0 o 0 0 0 

0 0 o 0 0 

p 0‘P] ?' OvM'O 0 0 O n 49^0 0 0 0 OOO 

0 4665 OOO 

o J 0 0 0 

0 0 0 0 0 

it U i) 0 0 

0 O o o 0 

5 C-'R4 ^noooco 0 r: O i.i 2035<» o 0 0 0 0 0 

0 36 m; 0 O 0 

U 350o OOO 

O 4 7SU OOO 

O 2500 0 o 0 

0 350 0 0 0 

3 0; 07 3001/000 0 0 0 0 40'» O 0 0 OOO 

u 35" 0 0 0 

O 55.; ooo 

u 60-f 0 o 0 

0 350 OOO 

0 20!> 0 0 0 

n 0-S7 11 “00000 C it o 250 O o 0 OOO 

O 600 0 0 0 

O 660 0 0 0 

0 660 0 0 0 

U 66-' 0 0 0 

V SSu 0 0 0 

0 20* o O 0 

O O o 0 0 

v v 0 0 0 

U u 0 0 0 


II-4-43 


60237000 



I? mu* laonuoon o o 


?\ mu* ? i "Oui: oo 0 c 


?? o.-’u? ??muooo o c 


??' 0!O.l ??OO0G0O 0 0 


21 CORl 23000000 0 0 


23 OCR* 23^00000 0 0 


n 0 0 

l! 0 0 


a t iooo 

■j l iooo 

i> 9*5<> 

O 

o o 

0 0 


0 0 
0 0 
0 0 
0 0 
0 0 
0 0 


0 

0 

0 

o 

0 

0 


O T 5000 
u H30O 

ft 25000 

O 17500 

u ft 

0 u 


o 0 
0 0 
0 o 
0 c 
0 0 
0 0 


0 

o 

0 

0 

0 

0 


U T 750 0 

o 900/ 0 

0 0 0 

U 0 0 

0 0 0 

0 0 0 


0 0 
0 0 
0 0 
0 0 
0 0 
0 0 


0 0 51200 

I) 34 700 

0 0 

0 0 

o o 

0 0 


ooo 
0 0 0 
0 0 0 
0 o 0 
ooo 
0 0 0 


o h 3620 

0 360.1 

0 2*50 

O 0 

0 o 

0 0 


0 0 
0 0 
0 0 
0 0 
0 0 
0 0 


0 

0 

0 

0 

0 

0 


0 T *550 
0 900 

O 1500 

U 0 

0 0 

0 o 


0 0 0 

ooo 
ooo 
ooo 
ooo 
0 0 0 


31 C0R1 31000000 0 0 


*1 C0R6 41000000 0 0 


*1 OOP7 41000000 0 0 


0 H 5*00 0 

0 250 0 

o oo 

0 oo 

o oo 

o oo 


0 

0 

0 

0 

0 

0 


0 

0 

0 

0 

0 

0 


0 T 15000 0 

0 850 0 

0 oo 

o oo 

0 oo 

o oo 


0 

0 

0 

0 

0 

0 


0 

0 

0 

0 

0 

0 


0 D 700 0 

0 300 . 0 

0 0 0 


0 

0 

0 


0 

0 

0 


ooo 


ooo 


0 


0 0 


ooo 


o o <y 


ooo 


ooo 


ooo 


ooo 


II-4-44 


60237000 



4? Of’B* 4?0ou6P0 0 0 


61 r,n«Z 51000000 0 0 


5? '.‘••01 5?C!OOOCO 0 u 


55 C"C(5 55000000 0 


55 0'>B7 55000000 0 0 


54 0 :; r? 54000000 0 0 


61 COO5 61'OouOO 0 0 


n cool 7i'’nocoo o o 


O H 3600 
0 3750 

0 400 

0 6400 

0 12350 

<i 5100 


71 (>0R2 71000000 0 o 


T 4500 
SOOo 


60237000 



0 


7) On«4 Tlf’WJOO 0 


7? O' Pi 7?"'OOCOf) 0 


7? C'O.1 7? n i'OuCll 0 


“1 c°R7 hi'oi»i>po n 


a? h.-b<. P?nol>0';0 0 


<ai o.-.’r 7 oif’noQ'Jc n 


y 50‘J n 

I! 1100'! o 

U 1950-' ?» 

U 8S0>* 0 


n 


0 

0 


n 

0 

0 


o " 1200 0 

0 125U 0 

U 1250 1 

y 1250 o 

o 1250 0 

u 950 0 


0 

('. 

0 

0 

0 

0 


0 

0 

0 

0 

0 

0 


H 1250 .) 

0 1300 o 

U 1450 0 

0 1350 0 

0 1200 0 

u o 0 


0 

0 

0 

0 

0 

0 


0 

0 

0 

0 

0 

0 


0 0 2500 O 

0 300o 0 

0 4050 0 

0 3200 0 

O 1400 0 

0 0(1 


o 0 

O 0 
1) 0 
0 0 
0 0 
0 0 


U U 40‘j 0 

o 1250 0 

0 1350 0 

O 950 n 

U o 0 

O o 0 


0 

0 

0 

0 

0 

0 


0 

0 

0 

0 

0 

0 


0 0 3550 n 

0 H5o y 

u oo 

o o o 

0 o 

u y o 


o 

o 

0 

0 

0 

0 


0 

0 

0 

0 

0 

0 


0 i) 700 0 

0 1050 0 

u 150<j 0 

o 1400 0 

o y o 

y 0 n 


0 

0 

0 

0 

0 

0 


0 

0 

0 

0 

0 

0 


0 0 


0 


0 0 


0 


0 


0 0 


0 0 0 


0 0 0 


0 0 0 
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60237000 
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ATr S (GlytM PY YYO« UNIT WAIF. ANU OVERHEAD RAIE) 


n Ou*! 

04/? 

45' 

RrtO 

<:• 00*2 

bn'r' 

1C •• 

n 

o 00*3 

bH<? 

to:- 

:jco 

'J OOPA 

04? 

10 ’ 

UNO 

C COUP 

b-4? 

ICC 

pc 

1 C O PR 


10<‘ 

o 

■; 10*7 
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PERT/CCST 

MANAGEMENT SUMMARY REPORT 





REPORTING c 

RGN. CONTRACT NO. 


term - 


C36 

1r ST TEST (FC& 

T?00 PF«T/CCST> 
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CUT-OFF 

DATE 9/17/64 








RELEASE 

DATE 9/17/64 

LEVFL 

/ SUMMARY ITFM 

- i / loco 








m>- 

COST OF 

WC«K / UNITS - DC 

LLARS 



SCHEDULE 






S 

- 

SCHED CCMPL DATE - TOTAL ITEM 


WS=K 

performed tc n»r£ 

TOTALS AT COMPLETION 

A 

- 

ACTUAL CCMPL DATE - TOTAL ITEM 





ROST 

E 

- 

EARLIEST CCMPL 

DATE - CRIT ITEM 




LATEST 

projected chit 

L 

• 

LATEST CCMPL DATE - CRIT ITEM 



mCtuaL »V*v r -^ r *ij i '»l 

PL«NN£0 REVISED 

(OVERRUN) SLACK 

CGMPL 

D 

1964 

104$ ATftQl 


VAI. ME 

COST UNDtWKflM 

COST fcSTIi-ATE 

UNDERRUN (WKS) 

date 

yrjfmamjjas CNDJFMAMJJASCND yr 






10/ 5/65 



s 

LEVFL 

1 




10/ 5/65 



E 


1 C'O 


702?75 

(702275) 1.7 

10/15/65 



L 






8/ 4/65 



S 

LEVEL 

■? 




7/26/65 



E 


11 -n 


129905 

(129905) 1.7 

8/ 5/65 


• 

L 






9/13/65 


• 

S 

LEVEL 

2 




9/13/65 


• 

E 


i? ;o 


19/520 

(197520) 1.7 

9/24/65 



L 






10/ 5/65 



S 

LFVFL 

/ 




10/ 5/65 



E 


1 300 


37-850 

(374850) 1.7 

10/15/65 


• 

L 


UNCLASSIFIED PAGE 1 


60237000 






PEMf/CCST 
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REPORT I 
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CONTRACT NO. 

TERM - 


C36 TFST TE ST 
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iT/rOST) 
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CUT-OFF DATE 

9/17/6* 








RELEASE DATE 

9/17/6* 

LEVFt / AMY 

iTrv - 1 / 

1 a«v i 







I DENT T F J r AT J On 


1ImE STATUS 


COST OF 

WORK / UNITS - DOLLARS 




SCuO CP 

F AMLItST 

MOST 

WORK PERFORMED 

ro date 

TOTALS AT COMPLETION 

CHAP'-iF CD 

1 MOST 

LARI ACT (A> 

-LATEST 

041 T 



LATEST 

PROJECTED 

SIJMVfi JY 

f fvc. n 

FvF’nT Co«°L 

CCMPL 

SLACK 

value actual 

(OVERRUN) 

PLANNED REVISED 

(OVERRUN) 

►JIJM-<FP 

\i v 0 . 

MO. UaTF 

OATe 

(WKS1 

COST 

UNDERRUN 

COST ESTIMATE 

underrun 




10/ S/65 

1.7 





l rrro 

1 1 

ji 

10/15/65 

J1 



702275 

(702275) 




6/ 4/65 

1.7 





1 1 0 

2 1 

JO 

9/24/65 

27 



129905 

(129905) 




2/16/65 

1.7 





i no 

1 1 

is 

2/26/65 

15 



10*905 

(10*905) 




2/16/65 

1.7 





1 ofi'C^O 

'* * 

IS 

2/26/65 

15 



57650 

(57650) 




1/12/65 

1.7 





200 TOO 

* 2 

10 

1/22/65 

10 



9755 

(9755) 




12/ 3/64 

5.9 





100 000 

A 1 

in 

1/22/65 

5 



37500 

(37500) 




A/ 4/65 

1.7 





1 1 ?r\ 

1 20 

jn 

0/24/65 

27 



25000 

(25000> 




7/26/65 

1.7 





l i'iO'C-.:o 


el 

M/ 5/65 

27 



3550 

(3550) 




H/ 4/65 

7.1 





1 ?oo"'"o 

4 25 

.JO 

4/24/65 

JO 



21*50 

(21*5o> 




4/13/65 

1.7 





lo o 

2 2 

JO 

4/24/65 

30 



197520 

(197520) 




4/13/65 

1.7 





l ?in 

i 

JO 

4/24/65 

30 



159970 

(159970) 




6/10/65 

6.1 





2ioo.-coo 

4 20 

27 

H/ S/6& 

27 



55800 

(55800) 


UNCLASSIFIED PA6E 1 


II-4-48 


60237000 



PE* f/CCST 

PRC6RA m /PR0jECT STATUS REPORT 


MtPCKTJNfi CRON. contract no. term - 

C36 TFST Tr.ST <F-p 3?0C PFRT/cCST) 333 CUT-OFF DATE 9/17/64 

RELEASE DATE 9/17/64 


LEVEL / SUMMARY ITfv - 1 / l*<y; 


inF' 

'TtFirPT rO'V 



11ML ST*TUS 


COST OF 

aOBK / UNITS - DOLLARS 






SCwD OR 

FAALJtST 

MOST 

»ORK PFxFCpMED 

TO DATE 

TOTALS 

AT COMPLETION 

CHoP'iF op 

I 

F 1 6 S 1 

Las 1 

ACT (A) 

-LATEST 

CHIT 




latest 

PROJECTED 

SUMMARY 

F 

K'JcMl 

tVF-T 

CrylPL 

COMPL 

SLACK 

VALUE actual 

(OVERRUN) 

planned 

REVISED 

(OVERRUN) 

N* IN «F R 

M 


wO. 

Date 

UATF 

(WKS) 

COST 

UNDERRUN 

COST 

ESTIMATE 

UNDERRUN 






6/lfl/bS 

7.0 






/?up.;D»:o 

4 

23 

26 

' 

p/2o/6b 

26 




87550 

(87550) 






9/13/6S 

1.7 






?3u0 ,0';0 

4 

26 

30 


9/24/65 

10 




16620 

(16620) 






->/ S/65 

7.7 






1??P 

** 

2 

26 


6/29/66 

25 




37550 

(37550) 






12/11/64 

19.2 






1 2?l 

4 

2 

9 


4/2S/6S 

9 




5650 

(5650) 






12/11/64 

19.2 






3ir><v-?~o 

C. 

> 

9 


4/2B/65 

9 




5650 

(5650) 






6/ 5/65 

7.7 






1 2?? 

4 

14 

2S 


6/29/65 

25 




31900 

(31900) 






3/26/65 

7.7 






4i«o-cro 

s 

]4 

24 


5/20/65 

24 




16850 

(16850) 






5/ 5/65 

7.7 






4200 -O' f> 

c. 

1 V 

25 


6/29/66 

25 




15050 

(15050) 






10/ 5/65 

1.7 






T3r:p 

? 

; 

u 


10/15/65 

31 




374850 

(374850) 






1/15/65 

3.1 






T 31 n 

3 

l 

14 


3/10/65 

11 




79950 

(79950) 






1/15/65 

3.7 






Sl-io-O'.-O 

4 


14 


3/10/65 

4 




4350 

(4350) 






12/23/64 

3.7 






S? '0 0! 0 

4 

4 

n 


1/21/6S 

11 




44250 

(44250) 


UNCLASSIFIED PA8E 2 


60237000 


TT = 4 _/ 1 Q 



PFRT/COST 

PPOiikAM/pPC JECT STATUS *EPORT 






REPOkTISf; CH6N. 


CONTRACT fcC. 

TERM - 


C36 TF^T Tf.ST 

(Pru 

3?0 • «F‘ 

T/CUST) 
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CUT-OFF DATE 

9/17/6* 










RELEASE DATE 

9/17/6* 

Lpvri, / C;||MMA«Y 

ITTM 

- 1 / 

1-pii 








toentifii-at 

inti 


IlMfc STATUS 



COST OF 

#OPK / UNITS - DOLLARS 





SCuP CP 

FuHLIEST 

MOST 

WORK 

PERFORMED 

TC DATE 

TOTALS AT COMPLETION 

CHARS* o-i 

1. 

first 

last “Ct (A) 

-latest 

C«1T 




LATEST 

PROJECTED 

sw'apv 

F 

1- Vf' | T 

FwE r ' T CpMPL 

CCMPL 

SLACK 

VALUE 

actual 

(OVERHUN) 

PLANNED REVISED 

(OVERRUN) 

MIJM-iA R 

V 

'iC. 

MO. UaTF 

UATE 

(WKS) 


cost 

UNDERRUN 

COST ESTIMATE 

UNDERRUN 





1 1/10/04 

3.7 






Sp.-ip- p'-p 

4 

(I 

7 

|2/ o/t>4 

7 




25100 

(25100) 





12/22/6* 

7.7 






HAHOvpf 0 

4 

P 

i 2 

2/17/05 

12 




6250 

<6250) 





4/?q/6S 

1.7 






1 3?p 


f-. 

22 

' */17/65 

19 




290250 

(290250) 





3/ P/OS 

1.7 






n?i 

4 

15 

IV 

J/1H/05 

19 




173*50 

(173*50) 





3/ p/OS 

1.7 






M '^n-'p^p 

S 

15 

IV 

J/lR/oS 

19 




173450 

(173*50) 





4/29/OS 

7.0 






13?? 

4 

13 

22 

0/17/OS 

22 




108*50 

(108*50) 





4/29/65 

7.0 






?l»p-'0f’0 

c - 

n 

22 

0/17/05 

22 




87750 

(87750) 





4/29/65 

7.0 






7Zi.»0'iP' , 0 

5 

1 H 

23 

0/17/OS 

23 




20700 

(20700) 





3/ p/05 

1.7 






1 3?3 

4 

6 

20 

3/1P/65 

20 




8350 

18350) 





1/20/05 

3.7 






«1 nr,'pro 

S 

6 

1 6 

2/15/05 

10 




3950 

(3950) 





3/ h/65 

1.7 






H?PPP0'.'0 

S 

1* 

20 

3/1P/65 

20 




**00 

(**00) 





10/ 5/OS 

1.7 






1 330 

? 

t r ‘ 

31 

10/15/05 

31 




*650 

(*650) 


UNCLASS TF1EO PASE 3 


II-4-50 


60237000 



PERT/CCST 

PROWRAm/PwCjECT STATUS REPORT 




REPORTING CrtGN, 

CONTRACT no. 

TERM - 


css 

TEST TEST (FOR 3?00 PFHT/eCSTJ 
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CUT-OFF DATE 

9/17/64 





RELEASE DATE 

9/17/64 

LEVEL 

/ SUMMARY ITFM - 1 / lW 






inFuTIFIrATICi'i 

IlMfc STATUS 

COST OF WORK / UNITS 

- DOLLARS 







SCwn OR 

earliest 

MOST 

WORK performed To date 

totals 

AT COMPLETION 

CHARGE CR 

L 

FIRST 

last 

ACT (A) 

-latest 

CRIT 



LATEST 

PROJECTED 

SUMMARY 

E 

f VC.NT 

EVERT 

C-MPL 

CCMPL 

SLACK 

VALUE ACTUAL (OVERRUN) 

planned 

REVISED 

(OVERRUN) 

NUMBER 

V 

NO. 


date 

UATE 

(MKSI 

COST UNDERRUN 

COST 

ESTIMATE 

UNDERRUN 






10/ 5/65 

1.7 





91O0H0P0 

4 

20 

31 


10/15/65 

31 



4650 

(4650) 


UNCLASSIFIED 


PAGE 4 


60237OOO 


u-4-51 



4.7.7 PERT TIME 


TciST TFST 

MAJC* SC*-‘T 
MINC^ SCUT 
FVF*-*T 

(f CP 3?-r. PPKI/TTPP) 

SMCC 

PPFD 

HpfiT/TIMf- 
activity hepcrt 

REPORTING CR'iN. CONTRACT NC. 

333 

ACTIV. OATF 

TERM- 

hepORT 

release 

date 

DATE- 9/17/64 
DATE- 9/17/64 

remaining 

PAGE 

P4FO. 

S'llCC. ACTIVITY OEschIoTIC' 

,i PRCH. TIME 

EXPECTED 

allowed 

CCMP/SCHED 

slack 

TIME 

ACCOUNT NC. 

r 

1 

0.0 


9/30/64 

A 9/17/64 

1.7 

0.0 

0 

I 1 

? 

7." 

11/10/54 

11/21/64 


1.7 

7.6 

1000000 

i i 

3 

3." 

10/13/54 

11/24/64 


5.9 

3.6 

3000000 

I 1 

A 

5.3 

10/26/64 

11/19/64 


3.7 

5.3 

51000000 

? 

5 

A.3 

12/11/64 

12/23/64 


1.7 

11.9 

2000000 


5 

4.1 

11/11/64 

12/23/64 


5.9 

7.7 

3000000 

** 

f, 

4.1 

11/11/64 

12/30/64 


6.6 

7.7 

1000000 

4 

7 

2.3 

11/10/64 

12/ 6/64 


3.7 

7.6 

53000000 

4 

8 

3.8 

11/20/64 

1/18/65 


7.7 

9.1 

52000000 

? 

R 

4.3 

12/11/64 

4/28/65 


19.2 

11.9 

31000000 

s 

m 

4.0 

1/12/65 

1/22/65 


1.7 

15.9 

2000000 

4 

i" 

3.0 

12/ 3/64 

1/22/65 


6.9 

10.7 

3000000 

ft 

11 

3.0 

12/ 3/64 

1/21/65 


6.6 

10.7 

81000000 

7 

i) 

6.0 

12/23/64 

1/21/65 


3.7 

13.6 

52000000 

H 

ip 

4.3 

12/22/64 

2/17/65 


7.7 

13.4 

54000000 

g 

n 

0.0 

12/11/64 

4/26/65 


19.2 

11.9 

31000000 

i ? 

1A 

3.1 

1/15/65 

3/10/65 


7.7 

16.5 

51000000 

10 

IS 

5.0 

2/16/65 

2/26/65 


1.7 

20.9 

1000000 

u 

16 

3.5 

1/20/65 

2/15/65 


3.7 

17,1 

81000000 

14 

17 

4.6 

2/17/65 

4/12/65 


7.7 

21.1 

41000000 

1 ^ 

I* 

l.l 

12/18/64 

5/ 5/65 


19.2 

13.0 

71000000 

IS 

1« 

2.8 

3/ 8/65 

3/18/65 


1.7 

23.7 

61000000 

1 ft 

?c 

4.h 

2/22/65 

3/10/65 


3.7 

21.7 

82000000 

IQ 

20 

O.o 

3/ 8/65 

3/10/65 


1.7 

23.7 

82000000 

17 

P) 

2.5 

3/ 5/65 

4/29/65 


7.7 

23.6 

42000000 

i g, 

p? 

5.6 

4/ 5/65 

6/17/65 


10.6 

27.7 

71000000 

1 R 

2? 

6.1 

2/ 3/65 

6/17/65 


19.2 

19.1 

72000000 

Pn 

p? 

7.6 

4/29/65 

6/17/65 


7.0 

31.3 

71000000 

?? 

23 

0.0 

4/29/65 

6/17/65 


7.0 

31.3 

72000000 

'M 

24 

3.0 

3/26/65 

5/20/65 


7.7 

26.6 

41000000 

?r 

25 

14.5 

b/16/65 

6/29/65 


1.7 

30.2 

11000000 

?4 

26 

5.6 

5/ 5/65 

6/29/65 


7.7 

32.2 

42000000 

^7 

?h 

4.1 

5/27/65 

7/15/65 


7.0 

35.4 

22000000 

?n 

<n 

13.6 

6/10/65 

8/ 5/65 


8.1 

37.3 

21000000 

?? 

27 

5.1 

6/ 3/65 

0/ 5/65 


9.0 

36.4 

21000000 

y'S 

27 

5.5 

7/26/65 

8/ 5/65 


1.7 

43.7 

11000000 

^»ft 

?7 

3.0 

6/17/65 

8/ 5/65 


7.0 

38.4 

23000000 


PA 

3.1 

6/18/65 

8/20/65 


9.0 

38.5 

22000000 

>7 

PH 

2.1 

6/ 9/65 

8/20/65 


1.7 

45.0 

23000000 

«>s 

P9 

2.0 

6/30/65 

8/19/65 


7.1 

40.2 

12000000 

?n 

30 

6.6 

5/ 6/65 

9/24/65 


20.0 

32.3 

91000000 

?R 

30 

4.6 

9/13/65 

9/24/65 


1.7 

50.6 

23000000 


30 

5.0 

8/ 4/65 

9/24/65 


7.1 

45.2 

12000000 

Us 

31 

3. 1 

10/ 5/65 

10/16/65 


1.7 

53.7 

91000000 


l 


CRG. 


/ 


TT-4-52 


60237000 



PAGE 1 


PERT/TIME 
ACTIVITY REPORT 



REPORTING orgn. 

CONTRACT NO. 

TEST TFST (FCP 32" ! G PEHT/TJKE5 


333 

MAJOR SORT SLK 



MINOR SORT TE 



FVFNT 

ACTIV. 

DATE 

PREO. SIJCC. ACTIVITY OESCRIpTI 

On PROS. TIME 

EXPECTED ALLOWED 


term- 

report DATE- 9/17/64 
RELEASE DATE- 9/17/64 


DATE REMAINING 

COMP/SCHED SLACK TIME ACCOUNT NO. 


CRG. 


0 

\ 

0.0 


9/30/64 A 9/17/64 

1.7 

0.0 

0 

1 

? 

7.6 

11/10/64 

11/23/64 

1.7 

7.6 

1000000 

7 

s 

4 e 3 

12/11/64 

12/23/64 

1.7 

11.9 

2000000 

b 

10 

4.0 

1/12/65 

1/22/65 

1.7 

15.9 

2000000 

10 

IS 

5.0 

2/16/65 

2/26/65 

1.7 

20.9 

1000000 

1 5 

19 

a.« 

3/ 8/65 

3/18/65 

1.7 

23.7 

61000000 

19 

20 

0.0 

3/ 8/65 

3/18/65 

1.7 

23.7 

82000000 

90 

25 

14.5 

6/16/65 

6/29/65 

1.7 

38.2 

11000000 

PS 

27 

5.5 

7/26/65 

8/ 5/65 

1.7 

43.7 

11000000 

71 

28 

2.1 

8/ 9/65 

8/20/65 

1.7 

45.8 

23000000 

7* 

30 

4.8 

9/13/65 

9/24/65 

1.7 

50.6 

23000000 

^0 

31 

3.1 

10/ 5/65 

10/15/65 

1.7 

53.7 

91000000 

1 

4 

5.3 

10/26/64 

11/19/64 

3.7 

5.3 

51000000 

4 

7 

2.3 

11/10/64 

12/ 8/64 

3.7 

7,6 

53000000 

7 

11 

6.0 

12/23/64 

1/21/65 

3.7 

13.6 

52000000 

1 1 

IS 

3.5 

1/20/65 

2/15/65 

3.7 

17.1 

81000000 

IS 

20 

4.6 

2/22/6S 

3/18/65 

3.7 

21.7 

82000000 

1 

3 

3.6 

10/13/64 

11/24/64 

5.9 

3.6 

3000000 

3 

s 

4.1 

ll/H/64 

12/23/64 

5.9 

7.7 

3000000 

3 

6 

4.1 

11/11/64 

12/30/64 

6.6 


1000000 

b 

11 

3.0 

12/ 3/64 

1/21/65 

6*6 

10.7 

81000000 

b 

10 

3.0 

12/ 3/64 

1/22/65 

6.9 

10.7 

3000000 

77 

23 

0.0 

4/29/65 

6/17/65 

7.0 

31.3 

72000000 

?0 

2? 

7.6 

4/29/65 

6/17/65 

7.0 

31.3 

71000000 

77 

26 

4.1 

5/27/65 

7/15/65 

7.0 

35.4 

22000000 

7 b 


3,0 

6/17/65 

8/ 5/65 

7.0 

38.4 

23000000 

7* 

29 

2.0 

6/30/65 

8/19/65 

7.1 

40.2 

IZOOOOOO 

79 

3o 

5.0 

8/ 4/65 

9/24/65 

7.1 

45.2 

12000000 

4 

ft 

3.6 

11/20/64 

1/18/65 

7.7 

9.1 

52000000 

ft 

1? 

4.3 

12/22/64 

2/17/65 

7.7 

13.4 

54000000 

i? 

14 

3.1 

1/15/65 

3/10/65 

7.7 

16.5 

51000000 

14 

17 

4.6 

2/17/65 

4/12/65 

7.7 

21.1 

41000000 

1? 

21 

2.5 

3/ 5/65 

4/29/65 

7.7 

23.6 

42000000 

7] 

24 


3/26/65 

5/20/65 

7.7 

26.6 

41000000 

7U 

25 

5.6 

5/ 5/65 

6/29/65 

7.7 

32.2 

42000000 

20 

27 

13.o 

6/10/65 

8/ 5/65 

8.1 

37.3 

21000000 

?3 

27 

5.1 

6/ 3/65 

8/ 5/65 

9.0 

36.4 

21000000 

7b 

2« 

3.1 

6/18/65 

8/20/65 

9.0 

38,5 

22000000 

IS 

2? 

6.8 

4/ 5/65 

6/17/65 

10.6 

27.7 

71000000 

<5 

13 

0.0 

12/11/64 

4/28/65 

19.2 

11.9 

31000000 

? 

9 

4.3 

12/11/64 

4/28/65 

19.2 

11.9 

31000000 

13 

19 

1.1 

12/18/64 

5/ 5/65 

19.2 

13.0 

71000000 

tft 

2? 

6.1 

2/ 3/65 

6/17/65 

19.2 

19.1 

72000000 

90 

30 

5.6 

5/ 6/65 

9/24/65 

20.0 

32.3 

91000000 
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report 

DATE- 

9/17/64 







release 

DATE- 

9/17/64 


MAJOR SORT 

TE 








MINOR SORT 

SUCC 








EVENT 


ACTIV. 

date 

oatE 

remaining 


PREO. 

succ. activity description 

PRCB. TIME 

EXPECTED 

ALLOWED 

CCMP/SCHED 

SLACK 

TIME 

ACCOUNT NO. 

0 

1 

0.0 


9/30/64 

A 9/17/64 

1.7 

0.0 

0 

I 1 

3 

3.6 

10/13/64 

11/24/64 


5.9 

3.6 

3000000 

I 1 

4 

5.3 

10/26/64 

U/19/64 


3.7 

5.3 

51000000 

r i 

2 

7.6 

11/10/44 

11/23/64 


1.7 

7.6 

1000000 

4 

7 

2.3 

11/10/64 

12/ 8/64 


3.7 

7.6 

53000000 

3 

S 

4.1 

11/11/64 

12/23/64 


5.9 

7.7 

3000000 

3 

4 

4.1 

11/11/64 

12/30/64 


6.6 

7.7 

1000000 

4 

a 

3.» 

11/20/64 

1/18/65 


7.7 

9.1 

52000000 

6 

10 

3.0 

12/ 3/64 

1/22/65 


6.9 

10.7 

3000000 

4 

n 

3.0 

12/ 3/64 

1/21/65 


6.6 

10.7 

81000000 

? 

5 

4.3 

12/11/64 

12/23/64 


1.7 

11.9 

2000000 

2 

9 

4.3 

12/11/64 

4/28/65 


19.2 

11.9 

31000000 

Q 

13 

0.0 

12/11/64 

4/28/65 


19.2 

11.9 

31000000 

13 

1 A 

1.1 

12/18/64 

5/ 5/65 


19.2 

13.0 

71000000 

n 

1? 

4.3 

12/22/64 

2/17/65 


7.7 

13.4 

54000000 

7 

11 

6.0 

12/23/64 

1/21/65 


3.7 

13.6 

52000000 

5 

10 

4.0 

1/12/65 

1/22/65 


1.7 

15.9 

2000000 

1? 

14 

3.1 

1/15/65 

3/10/65 


7.7 

16.5 

51000000 

11 

16 

3.-5 

1/20/65 

2/15/65 


3.7 

17.1 

81000000 

1« 

2? 

6.1 

2/ 3/65 

6/17/65 


19.2 

19.1 

72000000 

10 

15 

5.0 

2/16/65 

2/26/65 


1.7 

20.9 

1000000 

14 

17 

4.6 

2/17/65 

4/12/65 


7.7 

21.1 

41000000 

14 

20 

4.6 

2/22/65 

3/18/65 


3.7 

21.7 

8200000a 

17 

21 

2.5 

3/ 5/65 

4/29/65 


7.7 

23.6 

42000000 

rs 

19 

2.* 

3/ ft/65 

3/18/65 


1.7 

23.7 

-61-000000 

1 9 

20 

0.0 

3/ 8/65 

3/18/65 


1.7 

23.7 

82000000 

PI 

24 

3.0 

3/26/65 

5/20/65 


7.7 

26.6 

4100000C 

IS 

2? 

6.8 

4/ 5/65 

6/17/65 


10.6 

27.7 

7100000C 

20 

22 

7.6 

4/29/65 

6/17/65 


7.0 

31.3 

71000000 

?? 

23 

0.0 

4/29/65 

6/17/65 


7.0 

31.3 

7200000C 

-24 

25 

5.6 

-5/ 5/65 

6/29/65 


7.7 

32.2 

4200000C 

?0 

30 

8.6 

5/ 6/65 

3/24/65 


20.0 

32.3 

91OOOOOC 

23 

26 

4.1 

5/27/65 

f/15/65 


7.0 

35.6 

22000000 

23 

27 

5.1 

6/ 3/65 

1/ 5/65 


9.0 

36.4 

21000000 

20 

27 

13.6 

6/10/65 

3/ 5/65 


8.1 

37.3 

21000000 

20 

25 

14.5 

6/16/65 

6/29/65 


1.7 

38.2 

11000000 

26 

27 

3.0 

6/17/65 

8/ 5/65 


7.C 

38.4 

23000000 

->4 

28 

3.1 

6/1B/65 

8/20/65 


9.C 

38.5 

22000000 

,->S 

2® 

2.0 

6/30/65 

8/19/65 


7.1 

40.2 

12000000 

25 

27 

5.5 

7/26/65 

8/ S/65 


1.7 

43.7 

11000000 

PS 

30 

5.0 

8/ 4/65 

9/24/65 


7.1 

45.2 

12000000 

27 

?H 

2.1 

8/ 9/65 

8/20/65 


1.7 

45.8 

23000000 

?« 

30 

4 t ' 

9/13/65 

9/24/65 


1.7 

50.6 

23000000 

30 

31 

T. 

10/ 5/35 

10/15/65 


1.7 

¥37T 

91000000 
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ACCT 


MINOR SC'RT 



FVFMT 


ACTIV. 

PUF'l. 

Si)CC. ACTIVITY !)ESC W IP'1C»' 

PROS. TIME 

n 

1 

O.u 

t i 

2 

7.6 

3 

S 

4.1 

1C 

15 

5*u 

2 

S 

4.3 

s 

1 c 

4.U 

3 

s 

4.1 

s 

10 

3.u 

I 1 

3 

3.6 

?0 . 

25 

14.5 

25 

27 

5,5 

/s 

?9 

2.0 

?9 

30 

5.0 

•*3 

27 

5.1 

?C 

27 

13.6 

?3 

2* 

4.1 

26 

2« 

3.1 

26 

27 

3.u 

?7 

28 

2.1 

in 

30 

4.« 

? 

9 

4.3 

<j 

13 

O.u 

14 

17 

4.6 

?] 

24 

3.0 

17 

21 

2.5 

?A 

2S 

5.6 

i? 

i4 

3 1 

I 1 

4 

il 3 

4 

0 

3.6 

7 

11 

6.u 

4 

7 

2.3 

ft 

12 

4,3 

IS 

IS 

2.6 

IS 

2? 

6.6 

PO 

2? 

7.6 

n 

1« 

1.1 

?? 

23 

0.0 

is 

22 

6.1 

n 

IS 

3.5 

6 

11 

3.0 

is 

20 

4.6 

19 

20 

0.0 

?0 

30 

8,6 

3p 

31 

3.1 
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333 REPORT 

DATE- 

9/17/64 



relfase 

DATE- 

9/17/64 


date oate 

REMAINING 


expecteo 

ALLOWED COMP/SCHED 

SLACK 

TIME 

ACCOUNT NO. 


9/30/64 A 9/17/64 

\ 7 

0.0 

0 

11/10/64 

11/23/64 

U7 

7.6 

1000000 

11/11/64 

12/30/64 

6.6 

7.7 

1000000 

2/16/65 

2/26/65 

1.7 

20.9 

1000000 

12/11/64 

12/23/64 

1.7 

11.9 

2000000 

1/12/65 

1/22/65 

1.7 

15.9 

2000000 

11/11/64 

12/23/64 

5.9 

7.7 

3000000 

12/ 3/64 

1/22/65 

6.9 

10.7 

3000000 

10/13/64 

11/24/64 

5.9 

3.6 

3000000 

6/16/65 

6/29/65 

1.7 

38.2 

11000000 

7/26/65 

8/ 5/65 

1.7 

43.7 

lioooooo 

6/30/65 

8/19/65 

7.1 

40.2 

12000000 

8/ 4/65 

9/24/65 

7.1 

45.2 

12000000 

6/ 3/65 

8/ 5/65 

9.0 

36.4 

21000000 

6/10/65 

8/ 5/65 

8.1 

37.3 

21000000 

5/27/65 

7/15/65 

7.0 

35.4 

22000000 

6/18/65 

8/20/65 

9.0 

38.5 

22000000 

6/17/65 

8/ 5/65 

7.0 

38.4 

23000000 

8/ 9/65 

8/20/65 

1.7 

45.8 

23000000 

9/13/65 

9/24/65 

1.7 

50.6 

23000000 

12/11/64 

4/28/65 

19.2 

11.9 

31000000 

12/11/64 

4/28/65 

19.2 

11.9 

31000000 

2/17/65 

4/12/65 

7.7 

21.1 

41000000 

3/26/65 

5/20/65 

7.7 

26.6 

41000000 

3/ 5/65 

4/29/65 

7.7 

23.6 

42000000 

5/ 5/65 

6/29/65 

7.7 

32.2 

42000000 

1/1K/6S 

3/10/65 

7.7 

16.5 

51000000 

10/26/64 

11/19/64 

3.7 

5.3 

51000000 

11/20/64 

1/18/65 

7.7 

9.1 

52000000 

12/23/64 

1/21/65 

3.7 

13.6 

52000000 

11/10/64 

12/ 8/64 

3.7 

7.6 

53000000 

12/22/64 

2/17/65 

7.7 

13.4 

54000000 

3/ 8/65 

3/18/65 

1.7 

23.7 

61000000 

4/ 5/65 

6/17/65 

10.6 

27.7 

71000000 

4/29/65 

6/17/65 

7.0 

31.3 

71000000 

12/1R/64 

5/ 5/65 

19.2 

13.0 

71000000 

4/29/65 

6/17/65 

7.0 

31.3 

72000000 

2/ 3/65 

6/17/65 

19.2 

19.1 

72000000 

1/20/65 

2/15/65 

3.7 

17.1 

81000000 

12/ 3/64 

1/21/65 

6.6 

10.7 

81000000 

2/22/65 

3/18/65 

3.7 

21.7 

82000000 

3/ 8/65 

3/18/65 

1.7 

23.7 

82000000 

5/ 6/65 

9/24/65 

20.0 

32.3 

91000000 

10/ 5/65 

10/15/65 \ 

1.7 

53.7 

91000000 


I 
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8EPCST 

DATE- 9/17/64 









release 

DATE- 9/17/64 


LFVFt /SHwnaqY TTFM 

■ 1/ 1 













latest 








NILESTONE 

EXPECTED 

ALL0948LE 

scheduled 

actual 

SLACK 

FVFNT un 

. FVFf.’T 

OESCMPTlSN 

CO'lE 

DATE 

DATE 

DATE 

DATE 


l 

FwF.MT 

i 


1 


9/30/64 


9/17/64 

1.7 

2 

fvfnt 

? 


2 

n/io/64 

11/21/64 

11/11/84 


1.7 

1 

FvEUT 

T 


1 

10/11/84 

11/2a/64 

10/18/64 


5.9 

4 

EVENT 

A 


4 

10/28/64 

11/19/64 

10/28/64 


3.7 

s 

F VF MT 

S 


5 

12/11/64 

12/23/64 

12/14/64 


1.7 

s 

FVFNT 

A 


6 

11/11/64 

12/3>/64 

11/16/64 


6.6 

T 

F VENT 

7 


7 

11/10/64 

12/ 8/64 

11/16/64 


3.7 

“ 

EVENT 

p 


8 

11/20/64 

1/16/65 

11/21/64 


7.7 


fvfnt 

l r 


lo 

1/12/65 

1/22/65 

1/ 8/65 


1.7 

1 l 

FVFNT 

11 


11 

12/21/64 

1/21/65 

12/24/64 


3.7 

12 

EVENT 

1? 


12 

12/2?/64 

2/17/65 

12/24/64 


7.7 

1 1 

FVF>'T 

n 


13 

12/11/64 

4/28/65 

12/24/64 


19.2 

1“ 

EVENT 

14 


1 4 

1/15/65 

.1/1/65 

1/18/65 


7.7 

I s 

FvEnT 

IS 


IS 

2/16/65 

2/26/65 

2/12/65 


1.7 

1* 

EVENT 

IE 


IS 

1/20/65 

2/15/65 

1/22/65 


3.7 

1“ 

event 

IP 


18 

12/18/64 

5/ 5/65 

1/11/65 


19.2 

14 

FVFNT 

19 


19 

3/ 8/65 

3/l«/65 

3/ 5/65 


1.7 

? n 

EVENT 

?.r 


20 

3/ 8/65 

1/18/65 

3/ 5/65 


1.7 

21 

E vEnT 

?i 


/I 

3/ 5/65 

4/29/65 

3/15/65 


7.7 

?2 

EVENT 

?■? 


22 

4/29/65 

6/17/65 

5/ 1/65 


7.0 

?1 

Fvt NT 

21 


23 

4/29/65 

6/17/65 

5/ 1/65 


7.0 

?4 

EVENT 

24 


24 

3/26/65 

5/20/65 

4/ 6/65 


7.7 

28 

EVENT 

25 


25 

6/16/65 

6/29/65 

6/18/65 


1.7 

?4 

Event 

2* 


26 

5/27/65 

7/15/65 

6/ 4/65 


7.0 

77 

FVFNT 

?7 


27 

7/26/65 

8/ 5/65 

8/ 2/65 


1.7 

2* 

EVENT 

?« 


2« 

8/ 9/65 

8/20/65 

8/18/65 


1.7 

?v 

EVENT 

29 


29 

6/30/65 

8/19/65 

7/12/65 


7.1 

10 

event 

10 


30 

9/11/65 

9/24/65 

9/22/65 


1.7 

11 

FVFNT 

11 


31 

10/ 5/65 

10/15/b5 

10/15/65 


1.7 

I FTNf! o 

"K7 PAUSE ‘OF 

!"1 
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4. 7. 8 REPORT GENERATOR 


RG-32 (1.0) 

0 UT 1 ASSIGN PRINT BUF 1 LOw BCD UNIT Ol 

* THERE IS NO RECORD AREA AN ERROR MS0 SHOULD APPEAR 
REPORT 

***** pDl1 ***** 

OUT1 RPTFMT 

detail detail 

L THIS IS A NON STANDARD LABEL 
RPTOT 

l this is the end 

JERRY PROCEO 

GEN DETAIL 
END 


4.7.9 SAINT 


4. 7.10 SCOPE UTILITY 

UTILITY has been INSTALLED on THIS LIBRARY, 


4. 7.11 TAPE SORT 

I FTNO 0060 STOP 
SORT 

01122111R 040301 1100090010 

1ISI00800080F BMO1 OISOISORT-FILE , 0112316801999 

10 000803040F RM C 

9ENDS0RT 

I TSRT 213 B INTERNAL MERGE IP LOG UNITS 
04,03, 

I TSRT 214 B INTERNAL MERGE OP LOG UNITS 

01 . 

A TSRT 323 B UNIT 01 FOR SORT IP, 

I TSRT 239 B IB 20 OB 2000 0 8941 

A TSRT 303 B UNIT 1. MOUNT SCRATCH. 

I TSRT 222 B 38 IN 

I TSRT 223 B 38 OUT 

I TSRT 232 B 1 SEG 

I TSRT 236 B FINAL MERGE 

A TSRT 305 B UNIT 1. MOUNT O/P TAPE, 

I TSRT 216 B UNIT 1. FINAL OUTPUT. REEL 01, 

I TSRT 222 B 38 IN 

I TSRT 223 B 38 OUT 


+ The OB and G figures are site dependent and will vary under a 32K or 16K system. 
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INSTALLATION-RELATED INFORMATION 



HARDWARE INITIALIZATION 


1 


1.1 INSTALLATION AUTOLOAD ROUTINE 

Each installation must manually establish an autoload routine in the autoload region of core. This 
routine is a basic and permanent machine entry. It is used to initiate machine operations, such 
as autoloading RTS or initiating a 512 image. 

The tape/card reader autoload procedure serves a dual purpose. It can autoload from tape unit 0 
or from the card reader if SELECT JUMP 6 is set. It halts at location xxx50 to allow hardware 
action to complete. (There is not enough space to check status.) When device motion stops, press 
GO to continue. 

The format of the tape/card reader autoload routine is: 


Location 

Instruction 

Comment 

xxx40 

006xxx52 

If SELECT JUMP 6 is set, load card 

xxx41 

770cc000 

Connect channel c, equipment e, tape unit 0 

xxx42 

010xxx41 

Reject 

xxx43 

771c0010 

Rewind channel c 

xxx44 

010xxx43 

Reject 

xxx45 

740xxx70 

Read first tape record into location 00000 

xxx46 

cOOOOOOO 


xxx47 

010xxx45 

Reject 

xxx 50 

77770000 

Stop 

xxx51 

01000000 

Go to program, location 00000 

xxx52 

770cc000 

Connect card reader unit 0, channel c, 
equipment e 

xxx53 

010xxx52 

Reject 

xxx54 

740xxx37 

Read first record into location 00000 

xxx55 

cOOOOOOO 


xxx 5 6 

010xxx54 

Reject 

xxx57 

010xxx50 

Go to stop instruction 


An alternate autoload procedure may be used if error checking is desired (on magnetic tape only). 
The routine reads the library tape, loads the first record of RTS into core, and jumps to address 
0. The routine checks for tape parity and lost data errors. If detected, the routine halts at 
xxx54 with the status of the unit in the A-register. To retry, the operator must press GO. 
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The format of the alternate autoload routine is: 


Location 

Instruction 

Comment 

xxx40 

770ce00u 

Connect 

xxx41 

010xxx40 


xxx42 

771c0010 

Rewind 

xxx43 

010xxx42 


xxx44 

740xxx70 

Input 

xxx45 

C0000000 


xxx46 

010xxx44 


xxx47 

772c0002 


xxx 50 

010xxx47 


xxx51 

772c0000 

Check status 

xxx 5 2 

17602400 


xxx53 

03000000 


xxx54 

000xxx42 

Halt and return to rewind 


The installation must supply the following parameters: 

c Channel number appropriate to equipment 
e Equipment number appropriate to unit 
u Unit number 

xxx is dependent on machine size and type as follows: 


Memory 

Type 

xxx 

16K 

3100/3150 

376 

32K 

3100/3150 

776 

16K 

3200/3300 

377 

32K 

3200/3300 

777 
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AET 


2 


AET defines the equipment available to the system. Each AET entry consists of two 24-bit words 
and an external definition which describes the hardware device and the system driver servicing it. 
Any channel or equipment dedicated to real-time or specialized operations must not appear in the 
AET. 



If two devices are serviced by the same driver, the second external definition may be omitted 
since only one definition is necessary. 

The inscriptions are defined as follows: 

a 0 Unit not assigned; a is set to 0 initially in AET for all entries which are not 
designated as system units. 

1 Unit assigned; a is set to 1 initially in AET (e. g. the library device) for all 
entries designated as system units. 

h Numeric hardware code. Each code represents a different hardware type. 


s 0 

1 

r 0 
1 

cp 0 
1 


01 . Magnetic tape (MT) 07 Paper tape punch (TP) 


02 

Card reader (CR) 

10 

03 

Printer (PR) 

11 

04 

Card punch (CP) 

12 

05 

Typewriter (TY) 

13 


(console) 

15 

06 

Paper tape reader (TR) 

16 


Implies unit is operable. 

Implies unit is inoperable. Generally s 
temporarily down or not yet available ft 

Unit assigned for use by this computer. 


Typewriter station (TS) 

Incremental plotter (PL) 

Satellite controller (SL) 

Disk pack controller (DP) 

Drum (DR) 

Optical character reader (OR) 

is set to 0 for all entries unless a unit is 
»r use. 


Unit reserved for use by another computer. 


No transmission parity error detected. 

Transmission parity error has occurred on previous READ, WRITE, READB 
operation. 
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m 0 Batch program indicator. 

1 Priority program indicator. Set m at 0 as this bit is manipulated only by RTS. 

cc Twelve bit connect code of the particular unit to which this entry relates, cc is 

euuu where: 

e One octal digit equipment number. 

uuu Up to three octal digits right justified represent the unit number, 
e 0 No action. 

1 Unit to be assigned. Set e at 0 as this bit is manipulated only by RTS. 

c Eight-bit channel code specifying the channels available to an equipment. A bit set 

at 1 means the corresponding channel is available to a unit; a bit set at 0 means the 
channel is not available. The following table shows the correspondence between bit 
positions and channel numbers. 


Bit Position 

22 

21 

20 

19 

18 

17 

16 

15 

Corresponding 

Channel 

0 

1 

2 

3 

4 

5 

6 

7 


daddr A 15-bit address which is the entry point name of the appropriate driver (see driver 

selection previously described). A zero value in this field indicates a nonresident 
driver and thus, a nonsystem unit. When RTS loads a nonresident driver, it sup¬ 
plies a driver address in this field. A system unit entry must have driver address 
in the daddr field. 


Entry point names to be used in this field for the various equipments and their drivers are given in 
the table. Specific COSY corrections for adapting the AET to a particular installation are not given 
because of the diversity of configurations. Instead, the COSY correction causes the complete 
deletion of the AET and the user must insert his complete hardware description. A general format 
of the AET is: 
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AET 


entry 1, word 1 ) 



EXT 

driver entry point name \ 

Library 

+ 1 


entry 1, word 2 ' 


+ 2 


entry 2, word 1 } 



EXT 

driver entry point name V 

CTO/CFO 

+ 3 


entry 2, word 2 ) 


+4 


entry 3, word 1 \ 



EXT 

driver entry point name > 

INP 

+ 5 


entry 3, word 2 ' 


+ 6 


entry 4, word 1 ) 



EXT 

driver entry point name \ 

OUT 

+ 7 


entrv 4. word 2 ' 

~ ' / 


+ 8 


entry 5, word 1 ) 



EXT 

driver entry point name > 

PUN 

+ 9 


entry 5, word 2 ^ 



In this scheme, the preceding are system units and the following are available units for batch or 
priority use. 


+ 10 

entry 6, word 1 ) 


EXT 

driver entry point name V 

Available equipment 

+ 11 

entry 6, word 2 ) 


+ 12 

entry 7, word 1 ) 


EXT 

driver entry point name > 

Available equipment 

+ 13 

entry 7, word 2 ) 
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SYSTEM DRIVERS 


Hardware 

Controllers 

Equipment 
(in combination) 

— 

COSY 

Name 

Entry Point 


362x 

604 



MT 

342x 

607 

DRIVLABT 

DRIVE R01 


322x 





36 2x 

601 



MT 

342x 

603 

DRIVLABT 

DRIVE R01 


322x 

606 




3518 

657 



MT 

3528 

659 

DRIVMMTC 

DRIVE R01 

CR 

3447 

405 

DRIV3649 

DRIVER02 


3649 


.. 


CR 

3248 

405 

DRIV3248 

DRIVER02 


3256 




PR 

3659 

501 

DRIV3659 

DRIVE R0 3 


3152 

505 



PR 

3555 

512 

DRV512 

DRV512 

CP 

3644 





3446 

415 ■ 

DRIV3644 

DRIVE R04 

CP 

3245 

415 

DRIV3245 

DRIVE R04 

TY 

Console 





typewriter 


DRIVTYWR 

DRIVE R0 5 

TR 

3691 

Paper tape 

DRTV3691 

DRIVE R0 6 

TP 


station 


DRIVE R07 

PL 

3293 

Plotter 

DRIV3293 

DRIVER11 

OR 

3195 

915 

DRIVE R12 

DRIVER16 


III-2-4 


60237000A 






































































RHT AND BRHT 


3 


3.1 RHT MODIFICATION 

The RHT is a 63-character table defining the equipment used during a batch run and the equipment 
assigned as system units (PUN, INP, OUT, etc.). In RTS, input/output units are referenced by 
logical unit numbers rather than by physical units. The character entries in the RHT, from 
character RHT+1 to RHT+63, correspond to logical units 01 to 63, respectively. Each RHT entry 
defining an equipment contains a nonzero value that is the ordinal of the AET and UST entry of the 
physical unit to which it is assigned. Certain system units must have permanent RHT entries as 
follows: 


LIB 

LUN 

63 

PUN 

LUN 

62 

OUT 

LUN 

61 

INP 

LUN 

60 

CTO 

LUN 

59 

CFO 

LUN 

58 


Each RHT position for logical units 58-63 must point to the appropriate AET and UST entries of 
an equipment with a resident driver. All nonsystem entries must initially be zero. The initial 
entries for system units PUN=05, CTO/CFO=02, OUT=04, INP=03, and LIB=01 need not be 
changed if the AET is in the described format. 


3.2 BRHT MODIFICATION 

The Priority Running Hardware Table (BRHT) is similar to the RHT except that only logical units 
1-49, 58, and 59 are available for reference by a priority program. Logical units 50-57 and 
60-63 are illegal units for a priority program and their BRHT entries must be zero; logical units 
58 and 59 are assembled to 02. The BRHT, like the RHT, contains 63 one-character entries 
from BRHT+1 to BRHT+63 that correspond to priority logical units 1-63, respectively. Entries 
for logical units 50-57 and 60-63 must be included in the BRHT but must have a zero value for 
detection of illegal priority program references. 
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PRELIB 


4 


The RTS product set includes PRELIB to modify and update the existing system library. 

PRELIB permits the user to: 

• Absolutize frequently used system programs (COMPASS, FORTRAN, etc.) to eliminate the 
necessity of relocating and linking their routines each time they are called. 

• Place the variable resident routines (PROTECT, LOADER, OVPRO) in several places 
in the relocatable file (file 2) to reduce system overhead during library searches for 
needed routines. 

• Delete, insert, or replace those routines anywhere in the relocatable file. Rearrangement 
of file 2 can place the most frequently used routines near the beginning of the file to reduce 
library search time. 

System routines are absolutized either because RTS requires it (e.g. absolutizing resident in 
order to autoload it) or because doing so reduces system overhead. Whenever resident and 
variable resident are modified, all other absolute routines must be re-absolutized. 

Creation or modification of the library requires a minimum of three tape units; duplication of 
the library requires at least two tape units. 

4.1 LOADING AND EXECUTION 

PRELIB requires all of memory and may not share time with another program. The PRELIB 
user must be familiar with the PRELIB source deck supplied for installation (Part n, section 4.1). 

PRELIB detail cards (PDC) are binary cards for the relocatable programs to be placed on the 
new library. Each deck must begin with an IDC card and end with a TRA card (see RTS 
Reference Manual). 


4.2 PRELIB CONTROL CARDS 

PRELIB control cards (PCC) direct PRELIB in the generation of a new library; they allow ad¬ 
dition and deletion of records and entry points. 


4.2.1 PRELIB 

The user loads PRELIB into core with the PRELIB statement. When PRELOAD encounters a 
PRELIB card, it calls the loader, which in turn calls OVPRO to load PRELIB and its overlays 
and segments from file 2 of the library tape. SEQUENCE, JOB, and any required EQUIP cards 
precede the PRELIB card. File 55, the scratch tape, must be equipped with an EQUIP, 55=MT, 
card. 

RTS gives control to PRELIB, which reads from INP. PRELIB executes automatically when 
called; a RUN card is not needed. 


60237000 


in—‘±—-i 



/ gPRELIB.Uj.UQ, S, A 

Uj Logical unit (1-54, 63) previously assigned by EQUIP to original input tape; if 

PRELIB, ,u Q is used, standard INP logical unit 63 is assumed to be the input tape. 

u Q Logical unit (1-54; different from u.) previously assigned by EQUIP to the new output 
tape. 

S If S is present, PRELIB generates a suppressed history of updated files on OUT. If S is 
omitted, PRELIB generates a detailed history of updated files on OUT (section 4.4). 

A Must be present if modifications include records to be absolutized and added to variable 
resident; A is omitted if modifications are for the relocatable file only. 

A comma follows the last parameter only if comments are to follow. 



Ill—4—2 


60237000 




4.2.2 FILE 


If a FILE card is the first card in the PRELIB input deck, it causes file 1 to be copied on the new 
library tape; it does no absolutizing for file 2. A FILE card also signals the completion of 
absolutizing for the library; it follows all input data to be absolutized by OV1. A second FILE card 
in a deck signals the end of file 2 input. 



4.2.3 REPLACE 


A REPLACE control card may also be used to identify records in file 2 to be replaced. A 
REPLACE card may be followed by a file 2 UNIT card if the replacement records are not on 
INP. If a REPLACE card is the first card in the PRELIB input deck, it instructs the PRELIB 
to replace resident. Normally variable resident and all file 2 absolute records are also re¬ 
absolutized since changes in resident may affect the addresses of system entry points referenced 
by these records (see example, section 4.3.3). When used for this purpose, the REPLACE card 
has no subfields. 



name^namejj Subprogram on existing relocatable file or blank 

The possible combinations specify the following actions: 


namej 

name n 

Action 

specified 

specified 

Replace subprograms namej; through name n 
with PDC records following REPLACE on 

INP or with PDC records on unit specified 
by UNIT card following REPLACE. 

blank 

specified 

Replace subprograms from beginning of re¬ 
locatable file through name n with indicated 
PDC's. 

specified 

blank 

Replace subprograms from name- to end of 
relocatable file with indicated PDC's. 

blank 

blank 

Replace entire relocatable file with indicated 
PDC's. 

name name 

n 

Replace named subprogram with indicated 
PDC's. 
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4.2.4 DELETE 


A DELETE control card prevents the transfer of the designated records from the old library tape 
to the new one. 

The user must delete subprograms in the order of their appearance in the relocatable file. 

There is no provision for deletion of resident subprograms since any modification of resident 
requires replacement of all of resident, variable resident, and file 2 absolute records. 


gDELETE, namej, name 


n 


namej, name n Subprograms on existing relocatable file or blank. The possible com¬ 
binations specify the following actions: 


namej 

name n 

Action 

specified 

specified 

Delete subprograms namej through namej 
on the relocatable file. 

blank 

specified 

Delete subprograms from beginning of 
relocatable file through name n . 

specified 

blank 

Delete subprograms from namej through 
end of relocatable file. 

blank 

blank 

Delete entire relocatable file. 

namej=name 

n 

Delete named subprogram. 


4.2.5 INSERT 

An INSERT control card adds records that are not on the old library tape to the new library tape. 
They are inserted on the relocatable file immediately after named subprogram. If no subprogram 
is specified, the new records become the first records of file 2. 


/ gINSERT,name 


name Subprogram on existing relocatable file or blank 

4.2,6 TAPE 

A TAPE control card copies a requested file 2 absolute record from the old library tape to the 
scratch tape. 
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7 

9 TAPE, name, R 


name Name of file 2 absolute record to be copied on scratch tape. 

R Rewinds old library tape and writes an end-of-file on the intermediate tape; 

used only on the last TAPE card in the PRELIB input deck. 

Each time PRELIB encounters a TAPE card or absolutizes a program, it fills one four-word 
entry in RECTABLE with the header for that record. The size of RECTABLE - a maximum of 28 
entries - determines the maximum number of absolute records allowed on the scratch tape. 

All absolutized routines to be added to file 2 must be on file 55 or on a unit designated by a UNIT 
card. 


4.2.7 UNIT 


A UNIT control card specifies the logical unit, other than INP, containing PRELIB detail card 
images. When a UNIT card is used to change resident or variable resident, it must follow an 
ORIGIN card or the PRELIB detail TRA card. When a UNIT card is used to control modifications 
of a relocatable file, it may follow a REPLACE, INSERT, or DELETE card. 


/ 


gUNIT.uj.name 


u^ Logical unit containing PRELIB detail deck; if 55, record name must be 

given. 

name Specifies absolute record on logical unit 55 to be copied on the new library 
tape; if not used, the unit is read until an end-of-file. 


4.2.8 MACRO 

A MACRO control card directs PRELIB to read Hollerith cards and write them on the new library 
tape in a form compatible with the system languages. 

A 

/ c) MACRO, p, u 

p Symbolic name, such as COMAC, that identifies a group of macros to be 

written. 

u Logical unit containing macro cards; if blank, INP is assumed. 

PRELIB adds a pseudo IDC card (word count of 41g) and then processes the MACRO cards. 
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Each 80-column Hollerith card is read into core as a 20-word BCD record modified as follows: 

Word 20 (columns 77-80) is deleted. 

Words 1-19 are renumbered 2-20. 

7 

A new word 1 with a w field of 71s and with a g punch in column one is added. 

Two such cards are then written as a 40-word BCD card image. 

COMPASS requires that all system macros occur in COMAC. 

An END card (COMPASS Reference Manual) must follow the last macro in the PRELIB input 
stream. 


4.2.9 SYMROUT 


A SYMROUT control card directs PRELIB to copy file one onto the new library tape and 
absolutizes system routines (COMPASS, FORTRAN, etc.) according to cards that come after it 
in the PRELIB input deck. If used, it must be the first card in the PRELIB input deck. RECORD, 
ORIGIN, and UNIT or PDC must follow for each file 2 program to be absolutized. 



SYMROUT 


4.2.10 RECORD 

A RECORD control card marks the beginning of a new record. It permanently specifies the lowest 
storage location used by any portion of the record when the record is absolutized. 


7 

9 


RECORD, m 


m Symbol^ octal address; symbol is any entry point previously defined; octal 

address is l-5 g digits. Either or both may be omitted; if both are 
omitted, address zero is assumed. 


The m value indicates the beginning of the record area of the simulated target memory used during 
PRELIB processing. Simulated target memory corresponds to target (execution time) memory. 


/ ^RECORD, STAR T+100 
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For example, START is location 743g and record area length is 4000g; the record area corresponds 
to the section of simulated target memory between 1043g and 50438. 

A RECORD card must be followed by an ORIGIN card. 


4. 2.11 ORIGIN 

An ORIGIN control card designates a loading position within a simulated target memory. 

/ ^ORIGIN, n, i 

n Unsigned 1-5 digit octal number or previously defined entry point in file 1; 

previously defined entry point may be modified by signed (+ or -) 1-5 digit octal 
number; may be blank. 

If not blank, n must be greater than or equal to m on the preceding RECORD card. 

i Unsigned 1-5 digit octal number; it indicates number of words to be deleted from 

beginning of routine when record is written from core to tape; may be blank. 

4.2.12 SEPOINT 

A SEPOINT control card must be used to define and enter any entry point into a permanent position 
in the loader symbol table (LST). 

/^SEPOINT, name 

name File 1 entry point name; if undefined in file 1, it is address of ABNORMAL; if 
present, it is entered in LST. Otherwise 77777g is entered in LST. 

A SEPOINT card must be inserted directly after the LOADER record. When only system routines 
(e.g. COMPASS) are absolutized, SEPOINT cards are illegal. 

A SEPOINT card may be used to prevent the loading of a subroutine or program; if the name 
specified on the control card is undefined, the symbol is equated to ABNORMAL, and the job will 
terminate. This technique is particularly useful for installations with optional floating-point 
and BCD hardware. For example, the following cards in file 1 input would prevent loading of 
hardware simulation routines FDPBOXS and BCDBOXS. 

SEPOINT, FDPBOXS 
SEPOINT, BCDBOXS 

Other undefined system entry points (CIP, etc.) do not invalidate the PRELIB as long as no 
routines refer to the undefined SEPOINT name. 

To link file 2 absolute records to system entry points, PRELIB generates its own loader symbol 
table. Therefore, if SEPOINT cards are inserted or deleted in resident, they should be inserted 
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or deleted in PLOVINT, the initializing routine of PRELIB. If this is not done, PRELIB may not 
load or a SYMROUT run may fail because of undefined references in COMPASS or FORTRAN. 


4.3 PRELIB EXAMPLES 

4.3.1 MODIFY RELOCATABLE ROUTINES 

Replace, delete, and insert relocatable routines in file 2: 


ggend-of-file 


.FILE 


LED cards, overlay control cards, etc. 
may also be inserted. To delete such 
cards, the decks before and after the 
card must be replaced. 


(binary deck to be inserted, 
IDC to TRA) 


^INSERT, BCDBOXS 


gDELETE, OCTBOXS, OCTBOXS 


6 


(binary deck of new DEBLOCK) 


Any overlay control card 
associated with a 
deck must be 
replaced with / 

that deck. -- L 


qREPLACE,DEBLOCK,DEBLOCK 


7F!LE 


gPRELIB, , 1, S 


gEQUIP, 55=MT, 01=MT 


j^JOB,, ,, 


^SEQUENCE, 001 
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4.3.2 REPLACE ABSOLUTIZED PROGRAMS 

Those products in file 2 partially comprised of absolute routines with overlays or segments 
(COMPASS, FORTRAN, etc.) can be modified during a SYMROUT run. Resident and variable 
resident need not be changed. 

For example, to replace only COMPASS: 
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FILE 


/9UNIT, 55, PROTECT 


gUNIT, 55, OVPRO 














PRELIB routines PHASE 2 and DEBLOCK write the absolutized records on the intermediate tape. 
These are transferred to the new library tape by file 2 UNIT cards. 

When the PRELIB input deck is relocatable binary card images on tape, a UNIT control card must 
follow the ORIGIN card but it cannot indicate the original library tape as the input source. 

After all records to be absolutized have been read, a §FILE card follows, indicating the end of 
this phase of the absolutizing process (i. e., the loading of the decks into target memory). Before 
any file 2 modifications are made, PHASE 2 links the absolute records to their external references! 
and DEBLOCK writes them as contiguous records on file 55. Those records in file 2 which have 
been reabsolutized must be replaced: 

^REPLACE, COMPASS, COMPASS 
gUNIT, 55 

The unit card informs PRELIB that COMPASS has been placed on file 55 previously. The 
procedure is identical for all other file 2 absolute records. 


t Linking to externals is the reason that all absolute programs must be reabsolutized if resident 
is modified, since the absolute fw addresses of some system entry points probably have changed 
as a result of the modification. 
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4.3.3 REPLACE RESIDENT 


All absolutized routines must be reabsolutized each time resident is modified. 


Note that the newly absolutized 
routines must be forcibly 
replaced using REPLACE 
and DELETE cards. 


/D 


end-of-file 


r 


?FILE . 


^UNIT, 55. PROTECT 


( 


7UNIT, 55, DUMP 


^REPLACE, DUMP, PROTECT 

[file 


All SE POINT cards 
follow the 


/Zrecord, LSTLGTH 
i y 


/7 


SE POINT, GOFLG 


LOADER binary 
deck. 


J ^SEPOINT, BCDBOXS 

( (LOADER binary deck) 
^ORIGIN, START2 

^^RECORD, START2 


{ (RDUMP binary deck) 
^ORIGIN, START2 


(^RECORD, START2 


(Resident decks) 


ORIGIN, 0 


^RECORD, 0 

/^REPLACE 


a 


(^gPRELIB, , 1, S 
j^EQUIP, 55 =MT, 01 =MT 


JOB 


^SEQUENCE 


3 
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